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PREFACE 


This manual is a programmer's guide to the 80287 Support Library. The Library is 
a package of software tools that enable the 80287 Numeric Data Processor (NDP) 
to provide a full range of floating-point capabilities to ASM286, PL/M-286 and 
Pascal-286 programmers. 


This manual is a reference guide, designed for use when writing code for ASM286, 
PL/M-286 and Pascal-286 programs. The documentation for each procedure and 
function is as self-contained as practical to avoid excessive page-flipping. 


For an initial overview of the library, read Chapters | and 2 and the first parts of 
Chapters 3, 4, and 5. Read Chapter 6 if you are concerned with compliance to the 
IEEE Standard. Pascal-286 programmers should read Appendix A. 


To find specific facts about individual procedures and functions, look in the reference 
pages, headed by large names, at the ends of Chapters 3, 4, and 5. 


Note that the reference pages contain material describing unusual values, such as 
denormals, unnormals, and pseudo-zeros. Remember these values are very uncom- 
mon and never occur for most applications. 


Appendixes D and E are quick reference material for experienced users of the 80287 
Support Library. 


Related Publications 


The following manuals are useful when reading this manual. Particularly crucial is 
the documentation on the 80287 itself, found in the ASM286 Language Reference 
Manual, order number 121924. 


¢ Introduction to the iAPX 286, order number 210308 

¢  PL/M-286 User’s Guide, order number 121945 

¢  Pascal-286 User’s Guide, order number 122051 

* {iAPX 286 Utilities User’s Guide, order number 121934 

* fAPX 286 System Builder User's Guide, order number 121935 

* ASM286 Macro Assembler Operating Instructions, order number 121925 
¢ 4tAPX 286 Programmer's Reference Manual, order number 210498 


¢ 4tAPX 286 Programmer's Reference Manual Numerics Supplement, order number 
122164 


System Requirements 


The 80287 Support Library is designed to function in an iAPX 286/20 environment. 
This environment consists of an iAPX 286 microprocessor and an 80287 Numeric 
Data Processor. 


Preface 80287 Support Library 


Notational Conventions 


The programming examples in this manual are presented as code that can be inserted 
intact into a PL/M-286 or ASM286 program. The examples contain no formulas of 
general syntax. 


Throughout this manual the term Numeric Processor Extension (NPX) refers to the 
80287 component. The term Numeric Data Processor (NDP) refers to any system 
that contains an NPX. 


The invocation examples follow the conventions commonly used in Intel manuals: 


In interactive examples, user input lines are printed in white 
on black to differentiate them from system output. 


«cer> Indicates a carriage return. 
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CHAPTER 1 


INTRODUCTION 


The 80287 Support Library greatly facilitates the use of floating-point calculations 
in ASM 286, PL/M-286 and Pascal-286. 


The interface libraries (80287.LIB, and NUL287.LIB) allow a choice of run-time 
environments for modules containing floating-point code. 


The decimal conversion library (DC287.LIB) aids the translation between human- 
readable numbers of many decimal formats and binary numbers in all of the formats 
supported by the Numeric Processor Extension (NPX). It also provides translation 
between binary formats. 


The common elementary function library (CEL287.LIB) provides a useful assort- 
ment of transcendental functions, rounding functions, and other common functions 
involving floating-point numbers. 


The error handler module (EH287.LIB) makes it easy to write interrupt procedures 
that recover from floating-point error conditions. 


Why the Support Library ls Needed 


Three areas in which many applications require support software to overcome 
functional limitations of the NDP are the following: 


* First, the NDP is, exclusively, a binary arithmetic machine. Although the NDP 
manipulates a variety of data types, it cannot operate directly on floating-point 
decimal quantities. Software must be invoked to convert decimal inputs to binary 
formats and binary answers to decimal output. 


¢ Second, the 80287 instruction set is limited in its implementation of elementary 
functions. There is a tangent function, for example, but no sine, and the tangent 
is defined only for inputs between 0 and 7/4. The implementation of a full set of 
elementary functions with complete domains is left to software. 

¢ Third, the handling of unmasked exceptions can complicate application software. 
Although the masked mode of error detection and recovery is adequate for most 
applications, customized error recovery is sometimes needed. Deciphering the 
NPX status information and restoring the NPX to a recovery state can be quite 
difficult. The 80287 Support Library software can make the task easier. 


System Software Needed to Use the Library 


Because the Support Library is called by ASM286, PL/M-286, and Pascal-286 
programs, you will need either the ASM286 assembler or the PL/M-286 or 
Pascal-286 compiler. 


You will need to compile your PL/M-286 and Pascal-286 modules under the 
MEDIUM or LARGE models of computation, because all of Support Library proce- 
dures are FAR procedures. 


Introduction 


80287 Support Library 


You will also need the 80286 utility BND286 to convert the object modules gener- 
ated by your programs into programs that can be loaded or programmed into memory 
and executed. (If you use EH287.LIB and your own interrupt routine, you will need 
to use the 80286 system builder, BLD286.) 


For consistency in the examples in this manual, BND286 and the Support Library 
are assumed to be on drive 0, all user-supplied files are assumed to be on drive 1. 


No run-time software is needed for the Support Library. Once you have obtained the 
final executable program, the program will run on any NDP system. 


CHAPTER 2 


THE INTERFACE LIBRARIES 


Overview 


The 80287 Support Library contains two interface libraries, 80287.LIB and 
NUL287.LIB. By selecting one of these libraries to appear in your BND286 state- 
ment, you can choose the run-time environment of your program: either with the 
80287 component or with no NPX capability. 


The interface libraries also contain the INIT87 and INITFP procedures, which 
initialize the NPX under the various environments, and FILTER(TQ_312), a null 
Boolean function used when an application program references FILTER, but does 
not use EH287.LIB. 


Initializing the NPX 


When power is first applied to an NDP system, the NPX must be brought to a known 
state. This is accomplished by calling one of the 80287 initialization procedures. 


We have provided two 80287 initialization procedures, INIT87 and INITFP, in each 
of the interface libraries. The 80287.LIB versions initialize the 80287 component 
and set the 80287 control word. The NUL287.LIB versions satisfy 80287 externals 
with null procedures and should be used only with software that contains no NPX 
instructions. 


The difference between INIT87 and INITFP is the 80287 control word default 
settings. INIT87 masks all exceptions. INITFP masks all exceptions except I. 
Although you may later modify the control word, you must first call either INIT87 
or INITFP. 


PL/M-286 Use of INIT87 or INITFP 


To use INIT87 in a PL/M-286 program, you must invoke the procedure before any 
floating-point arithmetic is performed. This can be done with the built-in procedure 


CALL INITSREALSMATHSUNIT; 
Following is the declaration of INITFP,which must appear at the top of your initial- 
ization module, and the call, which must be invoked before any floating-point arith- 


metic is performed. 


Because INIT87 and INITFP are FAR procedures, you must compile the 
PL/M-286 module under the MEDIUM or LARGE controls. 


INITFP: PROCEDURE EXTERNAL; 
END; 


CALL INITFP; 
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ASM286 Use of INIT87 or INITFP 


Following is the declaration of INIT87, which must appear at the top of your initial- 
ization module, and the call instruction, which must appear within the initialization 
procedure, The statements for INITFP are the same, with INITFP instead of INIT87. 


; The following line must appear outside all 
; SEGMENT-END pairs 
EXTRN INIT87: FAR 


CALL INITS7 ; Set up the NPX 


Binding Interface Libraries to User Programs 


When using the iAPX 286 with the 80287 NDP, you must bind the 80287.LIB library 
to your object modules. If you issue a call to INIT87 or INITFP but have no other 
floating-point instructions, you should bind NUL287.LIB to your object modules. 
The interface libraries must appear in the sequence of input modules after all modules 
that contain 80287 code. 


Following is the suggested order for the object modules in your BND286 command: 


Your object modules 

DC287.LIB if you are using it 

CEL287.LIB if you are using it 

EH287.LIB if you are using it 

80287.LIB or 

NUL287.LIB if you are using nonfloating-point application programs. 


Examples 


Suppose your program consists of two modules, MYMODI.OBJ and MYMOD2.OB)J, 
created with either ASM286 or PL/M-286. Issue the following command: 


If your program calls INIT87 or INITFP but contains no other floating-point 
instructions, issue the following command: 
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CHAPTER 3 


THE DECIMAL CONVERSION LIBRARY 


This chapter describes the use of DC287.LIB, a library of procedures that convert 
floating-point numbers from one format of storage to another. 


Overview of DC287 Procedures 


Intel supports three different binary formats for the internal representation of float- 
ing-point numbers (see Appendix C). DC287.LIB provides translation between these 
formats and an ASCII-encoded string of decimal digits. 


All DC287 procedure names begin with the three letters nigc. This prefix has been 
added to reduce the chance of conflict between a DC287 name and another name in 
your program. To make the names more readable, mzgc prefix appears in lowercase 
letters throughout this chapter. 


The binary-to-decimal procedure mqcBIN_DECLOW accepts a binary number in 
any of the three formats. Because floating-point numbers have so many output formats, 
mqcBIN_DECLOW does not attempt to provide a finished, formatted text string. 
Instead, it provides the “building blocks” for you to use to construct the output string 
that meets your exact format specification. 


The decimal-to-binary procedure mqcDEC_BIN accepts a text string that consists of 
a decimal number with optional sign, decimal point, and/or power-of-ten exponent. 
It translates the string into the caller’s choice of binary formats. 


An alternate decimal-to-binary procedure mqcDECLOW_BIN provides an input 
format similar to the output of mqcBIN_DECLOW. The low-level input interface is 
provided for callers who have already broken the decimal number into its constituent 
parts. 


The mqcLONG_TEMP, mqcSHORT_TEMP, mqcTEMP_LONG, and 
mqcTEMP_SHORT procedures convert floating-point numbers between the longest 
binary format, TEMP_REAL, and the shorter formats. The conversions are performed 
so that the outputs are NaNs if and only if the inputs are NaNs. This improves upon 
the conversion algorithm used by the 80287 when it loads shorter formats to and from 
its stack. 


DC287 contains alternate public names for its procedures. The names, listed in 
Appendix F, are used by some Intel translators. 


Declaring DC287 Procedures in ASM286 Programs 


In each source program module that calls a DC287 procedure, you must declare that 
procedure as external before it is used. 


Following are the declarations you should make at the top of your ASM286 program. 
You should include only those procedures you use. 
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All DC287 procedures must be declared FAR. 


This ASM286 code also includes declarations that ease the construction of parame- 
ters. The ASM286 examples given with the procedures later in this chapter assume 
that these declarations have been made. 


For easier referencing, the procedure declarations in the examples in the individual 
functions have been duplicated. You should not duplicate the declarations in your 
programs. 


; ASM286 declarations for using the DC287 decimal 
; conversion library 


; the following EXTRN statements must appear outside of 
; all SEGMENT-ENDS pairs. 


EXTRN mqcBIN_DECLOW: FAR 
EXTRN mqgcDEC_BIN: FAR 

EXTRN mqcDECLOW_BIN: FAR 
EXTRN mqcLONG_TEMP: FAR 
EXTRN mqcSHORT_TEMP: FAR 
EXTRN mqcTEMP_LONG: FAR 
EXTRN mqcTEMP_SHORT: FAR 


SHORT_REAL EQU 0 
LONG_REAL EQU 2 
TEMP_REAL EQU 3 


BIN_DECLOW_BLOCK STRUC 


BIN_PTR DD ? 
BIN_TYPE DB ? 
DEC_LENGTH DB ? 
DEC_PTR DD ? 
DEC_LEXPONENT DW ? 
DEC_SIGN DB ? 


BIN _DECLOW_BLOCK ENDS 


DEC_BIN_BLOCK STRUC 


DD ? . The names of these fields are the same as 

DB ? HE the first four fields in BIN_DECLOW_BLOCK. 
DB ? 

DD ? 


DEC_BIN_BLOCK ENDS 


DECLOW_BIN_BLOCK STRUC 


DD ? : The names of these fields are the same as in 
DB ? ; BIN _DECLOW_BLOCK. 

DB ? 

DD ? 

DW ? 

DB ? 


DECLOW_BIN_BLOCK ENDS 


Declaring DC287 Procedures in PL/M-286 Programs 


Following are the declarations you should make at the top of your PL/M-286 program. 
You should include only those procedures you use. 
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This PL/M-286 code also includes declarations that ease the construction of param- 
eters. The PL/M-286 examples given with the procedures later in this chapter assume 
that these declarations have been made. 


For easier referencing, the procedure declarations in the examples for the individual 
functions have been duplicated. You should not duplicate the declarations in your 
programs. 


To use DC287.LIB you must compile your PL/M-286 modules under the MEDIUM 
or LARGEcomputation models, because DC287.LIB’s procedures are FAR procedures. 


See the section “Alternate Method of DC287 Error Detection” later in this chapter 
for a discussion of when you might want to declare the procedures as BYTE proce- 
dures (to receive an error status). 


/* PL/M-286 declarations for using the DC287 decimal 
conversion library */ 


mqcBIN_DECLOW: PROCEDURE CBLOCK_PTR) EXTERNAL; 
DECLARE BLOCK_PTR POINTER; 
END mqcBIN_DECLOW; 


mqcDEC_BIN: PROCEDURE CBLOCK_PTR) EXTERNAL; 
DECLARE BLOCK_PTR POINTER; 
END mqcDEC_BIN; 


mqcDECLOW_BIN: PROCEDURE CBLOCK_PTR) EXTERNAL; 
DECLARE BLOCK_PTR POINTER; 
END mqcDECLOW_BIN; 


mqcLONG_TEMP: PROCEDURE (LONG_REAL_PTR,TEMP_REAL_PTR) 
EXTERNAL; 
DECLARE CLONG_REAL_PTR,TEMP_REAL_PTR) POINTER; 

END mqcLONG_TEMP; 


mqcSHORT_TEMP: PROCEDURE CSHORT_REAL_PTR,TEMP_REAL_PTR) 
EXTERNAL; 
DECLARE CSHORT_REAL_PTR,TEMP_REAL_PTR) POINTER; 

END mqgcSHORT_TEMP; 


mqcTEMP_LONG: PROCEDURE CTEMP_REAL_PTR,LONG_REAL_PTR) 
EXTERNAL; 
DECLARE CTEMP_REAL_PTR,LONG_REAL_PTR) POINTER; 

END mqcTEMP_LONG; 


mqcTEMP_SHORT: PROCEDURE CTEMP_REAL_PTR,SHORT_REAL_PTR) 
EXTERNAL; 
DECLARE CTEMP_REAL_PTR,SHORT_REAL_PTR) POINTER; 

END mqcTEMP_SHORT; 


DECLARE SHORT_REAL LITERALLY ‘0°; 
DECLARE LONG_REAL LITERALLY ‘2°; 
DECLARE TEMP_REAL LITERALLY ‘3°; 


DECLARE BIN _DECLOW_BLOCK STRUCTUREC 
BIN_PTR POINTER, 

BIN TYPE BYTE, 

DEC_LENGTH BYTE, 

DEC_PTR POINTER, 
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DEC_LEXPONENT INTEGER, 
DEC_SIGN BYTE); 


DECLARE DEC_BIN_BLOCK STRUCTURE (¢ 
BIN PTR POINTER, 

BIN_TYPE BYTE, 

DEC_LLENGTH BYTE, 

DEC_PTR POINTER); 


Stack Use of DC287 Procedures 


DC287 requires 176 bytes of the 80286 stack for its internal storage. This amount is 
allocated in the public STACK segment by the DC287 modules. 


All DC287 procedures save the entire state of the 80287 upon entry and restore it 
upon exit. 


Decimal Conversion Library Accuracy 


DC287 guarantees that an 18-digit decimal number will remain the same when 
converted into TEMP_REAL and then back to decimal. However, DC287 cannot 
guarantee that a TEMP_REAL number will remain the same when converted to 
decimal and then back to TEMP_REAL. Such accuracy would require arithmetic 
beyond the TEMP_REAL precision, which is too slow. The loss of accuracy is at 
worst less than 3 bits. 


The [EEE Standard (described in Chapter 6) specifies the accuracy for decimal 
conversions of SHORT_REAL and LONG_REAL numbers. Because DC287 uses 
TEMP_REAL arithmetic to perform its conversions, it exceeds the IEEE specifica- 
tions. 


Following is the range of SHORT_REAL and LONG_REAL numbers for which 
the IEEE standard specifies best possible conversion accuracy for conversion both to 
and from the decimal format. The maximum number of decimal digits for best 
accuracy is given in the second column; the maximum magnitude for the decimal 
exponent is given in the third column. The exponents are given assuming the decimal 
point is to the right of the significand. For example, the largest number for totally 
accurate SHORT_REAL to decimal conversion is 999999999e13. The smallest 
positive number is le-13. 


Decimal to SHORT_REAL 9 digits 
Decimal to LONG_REAL 19 digits 
SHORT_REAL to Decimal 9 digits 
LONG_REAL to Decimal 17 digits 


Following is a wider range of numbers for which the best possible conversion is not 
required. For numbers in the wider range, the IEEE standard allows an error of up 
to 0.47 times the unit in the last place. 


Decimal to SHORT_REAL 9 digits 
Decimal to LONG_REAL 19 digits 
SHORT_REAL to Decimal 9 digits 
LONG_REAL to Decimal 17 digits 


3-4 


80287 Support Library The Decimal Conversion Library 


Note that the chart on 3-4 shows tne number of decimal digits needed for decimal to 
binary and binary to decimal conversion routines where representation to the last bit 
is required. This is not the same as the number of significant digits that can be 
preserved on a decimal to binary to decimal operation. The number of significant 
digits is as follows: 


SHORT_REAL 6 digits 
LONG_REAL 15 digits 
TEMP_REAL 18 digits 


These are the maximum number of digits that may be requested to ensure correct 
rounding. 


Error Reporting in DC287.LIB 


DC287 incorporates the 80287 error-reporting mechanism. Whenever an error is 
detected, an appropriate 80287 exception bit is set. Using 80287 instructions, you can 
set your choice of unmasked bits and provide procedures that will be called whenever 
an unmasked exception is detected. This way, you do not have to test for errors every 
time you call a DC287 procedure. 


Whenever an unmasked exception is detected by any DC287 procedure, it places 
certain quantities into 80287 storage before calling your specified trap handler. 


¢ The 80287 instruction pointer is set to point at an FLDCW instruction (OPCODE 
is equal to O16E hex). This FLDCW instruction does not cause any exceptions; 
therefore, the FLDCW instruction itself does not update the 80287 exception 
pointer. You can interpret the reference to an FLDCW instruction to mean that 
DC287 discovered the exception. DECODE procedures in EH287.LIB detect 
DC287 exceptions in this manner. 


¢ The 2-word selector-offset pair that addresses the input number is placed into 
the memory operand pointer of the 80287. For mqcDEC_BIN and 
mqcDECLOW_BIN, this is a pointer into a DC287 internal buffer on the 80287 
stack, containing a string of decimal digits stripped for input to DECLOW_BIN. 
For all other procedures, this is the pointer to the original input binary number. 


Alternate Method of DC287 Error Detection 


If you prefer to perform error testing yourself, an alternate method is possible. All 
DC287 procedures return the 80287 exception byte in the AL register. 


You can access the AL register in PL/M-286 programs by declaring the DC287 

procedures to be of type BYTE. For example, you could change the declaration of 

mqcBIN_DECLOW to 

mqcBIN_DECLOW: PROCEDURE (BLOCK_PTR) BYTE EXTERNAL; 
DECLARE BLOCK_PTR POINTER; 

END mqcBIN_DECLOW; 

The call to mqcBIN_DECLOW would then take the form 

STATUS = mqgcBIN_DECLOWC@BIN_DECLOW_BLOCK); 


After executing the above statement, you can test exception conditions by examining 
STATUS. STATUS must be declared as type BYTE. 
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Format of Input Decimal Numbers to mqcDEC_BIN 


The decimal number that is input to DEC_BIN takes the form of a string of consec- 
utive ASCII bytes of memory, whose pointer is passed in the parameter block. The 
string may contain blanks after, but not before or within, the number. 


The number may begin with a plus sign or a minus sign. Lack of a sign is equivalent 
to a plus sign. 


The optional sign is followed by the significand. The significand is a sequence of one 
or more decimal digits, with an optional decimal point. The decimal point may appear 
before, within, or after the decimal digits. The significand must be present and contain 
at least one decimal digit. The upper limit to the number of digits is determined by 
the limit of 255 bytes to the entire string: however, only the 20 most significant non- 
zero digits of a long significand affect the output answer. 


The significand is followed by an optional exponent. This consists of one of the letters 
E, D, or T, followed by an optional plus or minus sign, followed by a string of one or 
more decimal digits. The signed number indicates the power of ten, which must be 
multiplied by the significand to yield the desired input number. E, D, and T all have 
the same meaning (to identify the exponent). They can be in uppercase or lowercase. 


Examples of Input Decimal Strings 
The following strings all represent the number 100: 


100 

+100 

100. 

100.00 
100.0000000000000000000060992 16948 
1E2 


alE3 
100000d —3 


Some valid strings for other numbers are 


3.14159265 
=17 

— 34.25T —009 
5.6E7 

.001 

—.4 

—0 


The following strings are invalid: 


1 E2 ; embedded space not allowed 
E2 ; missing significand 
.E2 ; Significand must contain at least one decimal digit 
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BIN_DECLOW — mqcBIN_DECLOW (Convert binary number 
to decimal string, low level interface) 


Parameter 


BIN_DECLOW_BLOCK_PTR, a double-word that points to a 13-byte block of 
memory. The block consists of six fields that contain the following variables: 


¢ BIN_PTR, a double-word that points to the input binary number. The amount 
of memory space occupied by the number is determined by BIN_TYPE. 


¢  BIN_TYPE, a one-byte input code that indicates the type (SHORT_REAL, 
LONG_REAL, or TEMP_REAL) of the number pointed to by BIN_PTR. The 
codes for the types are 0, 2, and 3, respectively. The caller must ensure that 
BIN_TYPE is set to the correct value; any other value gives an undefined result. 


¢ DEC_LENGTH, a one-byte input that indicates the number of decimal digits to 
be output at DEC_PTR. All one-byte values are legal. If zero is given, only the 
DEC_EXPONENT and SIGN are returned, with no string at DEC_PTR. A 
zero DEC_LENGTH combined with unusual inputs yields an Invalid Result error, 
as described below. 


¢ DEC_PTR, a double-word that points to the memory location that will hold the 
output string of ASCII decimal digits. Other possible output values are shown in 
the table beneath the DEC_SIGN heading. 

* DEC_EXPONENT, a word variable output by mqcBIN_DECLOW. The decimal 
point is assumed to be to the right of the digits output at DEC_PTR. DEC_EX- 
PONENT is then the power of ten, which, when multiplied by the number at 
DEC_PTR, will yield the correct number. For NaNs and infinities, DEC_EX- 
PONENT is 32767. For 0 and -0, DEC_EXPONENT is 0. 

* DEC_SIGN, a byte variable output by mqcBIN_DECLOW. It is set to ASCII 
““+"" (2B hex) if the input number is positive, and ASCII “—” (2D hex) if the 
number is negative. Other possible output values are shown below. 


Following are decimal outputs for unusual input numbers: 


Input number DEC_SIGN Decimal digits buffer 


NaN . followed by blanks 
+ infinity + followed by blanks 
— infinity — followed by blanks 
+0 blanks 


-0 0 followed by blanks 


Function 


mqcBIN_DECLOW converts the floating-point number of type BIN_TYPE, located 
at BIN_PTR, into a decimal representation stored in DEC_PTR, DEC_EXPO- 
NENT, and SIGN. The caller uses these quantities to construct the final output 
format of the number. 


mqcBIN_DECLOW provides only 18 decimal digits. If DEC_LLENGTH is greater 
than 18, the DEC_PTR buffer is filled with 18 decimal digits, followed by ASCII 
underscore (5F hex) characters. The decimal point is assumed to be to the right of 
the rightmost underscore. Thus, the underscore can be interpreted as “unknown 
decimal digit.” 
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Errors 


mqcBIN_DECLOW has three possible errors: 


1. Invalid input. This error occurs only when the input DEC_LENGTH is given as 
0 and the input number is —0, any infinity, or NaN. In these cases, the empty 
decimal digits buffer that the caller requested would have contained information 
other than decimal digits. The DEC_LSIGN and DEC_EXPONENT outputs are 
set appropriately. If the 80287 I exception is unmasked, the trap handler is called 
with the input number on the 80287 stack. 


2. Denormalized input. This error occurs only when BIN_TYPE is TEMP_REAL 
and the leading significand bit is zero. DEC_LSIGN and DEC_EXPONENT are 
given the correct output values. The output decimal digit string is given leading 
zeroes to indicate the extent of denormalization. If the 80287 D exception is 
unmasked, the trap handler is called with the input number on the 80287 stack. 


3. Inexact result. The correct answer is output. If the 80287 P exception is unmasked, 
the trap handler is called with the input number on the 80287 stack. 


Example of PL/M-286 Use 


mqcBIN_DECLOW: PROCEDURE (BLOCK_PTR) EXTERNAL; 
DECLARE BLOCK_PTR POINTER; 
END mqgcBIN_DECLONW; 


DECLARE REAL_VAR3 REAL; 
DECLARE DIGITS_BUFFERC6) BYTE; 
DECLARE FINAL_BUFFERC1S) BYTE; 


/* Assume that REAL_VAR3 contains the hex value 
COESA3ED. */ 


BIN_DECLOW_BLOCK.BIN_PTR = @REAL_VAR3; 
BIN_DECLOW_BLOCK.BIN_TYPE = SHORT_REAL; 
BIN_DECLOW_BLOCK.DEC_LENGTH = 6; 
BIN_DECLOW_BLOCK.DEC_PTR = gDIGITS_BUFFER; 
CALL mqcBIN_DECLOWC@BIN_DECLOW_BLOCK); 


/* The "building blocks" returned by mqcBIN_DECLOW are 
assembled into a six-digit scientific notation 
format */ 


FINAL_BUFFERCO0) = BIN_DECLOW_BLOCK.DEC_SIGN; 
FINAL_BUFFERC1) = DIGITS_BUFFER(0); 

FINAL_BUFFER(2) = *.4 3° 

CALL MOVBC @DIGITS_BUFFER(C1), @FINAL_BUFFER(3), S ); 
FINAL_BUFFER(8) = *E‘’; 


/* Assume DECIMAL_WORD_OUT translates the first INTEGER 
parameter into a string of decimal digits placed at the 
second POINTER parameter */ 


CALL DECIMAL_WORD_OUT CBIN_DECLOW_BLOCK.DEC_EXPONENT + 5, 
eFINAL_BUFFER(9)); 


/* FINAL_BUFFER now contains the string "-7.30120E0" */ 
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Example of ASM286 Use 


; This EXTRN must appear outside of all SEGMENT-ENDS 
} pairs: 
EXTRN mgcBIN_DECLOW: FAR 


REAL_VAR3 DD OCOESA36DR 
DIGITS_BUFFER_3 DB 6 DUP (7) 
FINAL_BUFFER DB 1S DUP (?) 
BLOCK_3 BIN _DECLOW_BLOCK « REAL_VAR3, 
& SHORT_REAL,?,DIGITS_BUFFER_3,?7,? » 
MOV BLOCK_3.DEC_LENGTH, 6 plug in the correct 
length 
MOV DX, SEGCBLOCK_3) upper part of param 
address 


PUSH DX 
MOV DX, OFFSETCBLOCK_3) 


goes onto stack 
lower part of param 
address 

goes onto stack 


PUSH DX 
CALL mqcBIN_DECLOW 


Now DIGITS_BUFFER contains the string "730120", DEC_SIGN 
equals "-", and DEC_EXPONENT equals -S. This 

information can be used to construct a number in any 
format desired. 
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DEC_BIN — mqcDEC_BIN (Convert decimal string to binary 
number) 


Parameter 


DEC_BIN_BLOCK_PTR, a double-word that points to a ten-byte block of memory. 
The block of memory contains four fields that hold the following variables: 


¢ BIN_PTR, a double-word that points to the output binary number. The amount 
of memory space occupied by the number is determined by BIN_TYPE. 


« BIN_TYPE, a one-byte input code that indicates the type (SHORT_REAL, 
LONG_REAL, or TEMP_REAL) of the number pointed to by BIN_PTR. The 
codes for the types are 0, 2, and 3, respectively. The caller must ensure that 
BIN_TYPE is set to one of the indicated legal values; any other value gives an 
undefined result. 


« DEC_LENGTH, a one-byte input that indicates the length of the memory field 
pointed to by DEC_PTR. The length must be between | and 255; 0 will give an 
undefined result. 


* DEC_PTR, a double-word that points to the input string of ASCII decimal digits. 
The format of the input string is given earlier in this chapter. The caller should 
already have verified correct input syntax before calling mqcDEC_BIN. 


Function 


mqcDEC_BIN converts the string pointed to by DEC_PTR into a binary floating- 
point number of type BIN_TYPE and leaves the number at the memory location 
pointed to by BIN_PTR. 


Errors 


mqcDEC_BIN has six possible errors: 


1. Illegal input. If the input string is not of the specified format, the output is 
undefined. No warning is issued. 


2. Overflow beyond the TEMP_REAL format. If the 80287 O exception is masked, 
a correctly signed infinity is stored in the output buffer. If it is not masked, the 
80287 trap handler is called with INDEFINITE on the 80287 stack, and nothing 
is written to the output buffer. 


3. Overflow beyond the output format, but not the TEMP_REAL format. If the 
80287 O exception is masked, the correctly signed infinity is stored in the output 
buffer. If the 80287 O exception is unmasked, the trap handler is called. In this 
case, the top of the 80287 stack contains the output number with the significand 
rounded to the output format’s precision. 


4. Underflow of the TEMP_REAL format. If the 80287 U exception is masked, 
the output buffer contains the result of gradual underflow. If U is unmasked, 
INDEFINITE is left on the 80287 stack, the output buffer is unchanged, and 
the 80287 trap handler is called. 


5. Underflow of the output format, but not of the TEMP_REAL format. The output 
buffer contains the result of gradual underflow. If the 80287 U exception is 
unmasked, the trap handler is called. In this case, the top of the 80287 stack 
contains the output number with the significand rounded to the output format’s 
precision. 


6. An inexact result. The output buffer contains the result rounded to the output 
format. If the 80287 P exception is unmasked, the trap handler is called with the 
TEMP_REAL result on the 80287 stack. Because this condition is not usually 
considered an error, the P exception is usually masked and the P error bit is 
ignored, 
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Example of PL/M-286 Use 

mqcDEC_BIN: PROCEDURE (BLOCK_PTR) 
DECLARE BLOCK_PTR POINTER; 

END mqcDEC_BIN; 


DECLARE REAL_VAR REAL; 
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EXTERNAL; 


DECLARE INPUT_BUFFER (120) BYTE; 

DECLARE ACTUAL BYTE; 

/* Assume that at this point a decimal string (e.g. 
"-3.4E2") has already been placed into INPUT_BUFFER, 
and a buffer length (6 for the above number) has been 
placed into ACTUAL *#/ 

DEC_BIN_BLOCK.BIN_PTR = @REAL_VAR; 

DEC_BIN_BLOCK.BIN_TYPE = SHORT_REAL; 

DEC_BIN_BLOCK.DEC_LENGTH = ACTUAL; 

DEC_BIN_BLOCK.DEC_PTR = g@INPUT_BUFFER; 

CALL mqcDEC_BIN C@DEC_BIN_BLOCK); 

7* REAL_VAR now equals the encoded SHORT_REAL value. For 


the sample string given, 


Example of ASM286 Use 


REAL_VAR = 


“13540 As/ 


+ This EXTRN must appear outside of all SEGMENT-ENDS 
3 pairs: EXTRN mqcDEC_BIN: FAR 
INPUT_BUFFER DB 100 DUP (7?) 
ACTUAL DW 0 
REAL_VAR DQ 0 
BLOCK_1 DEC_BIN_BLOCK « REAL_VAR, LONG_REAL, ?, 
& INPUT_BUFFER » 
ENTRY: 
; Assume that at this point a decimal string (e.g. 
3 "-3.4E2") has already been placed into INPUT_BUFFER, 
; and a buffer length (6 for the above number) has been 
; placed into ACTUAL. 
MOV AX, ACTUAL ; get length of string 
MOV BLOCK_1.DEC_LENGTH, AL i; place byte into param 
; block 
MOV DX, SEGCBLOCK_1) ; top half of param 
; block ptr 
PUSH DX + goes onto stack 
MOV DX, OFFSETCBLOCK_1) ; bottom half of param 
; block ptr 
PUSH DX $ goes onto stack 
CALL mqcDEC_BIN ; convert string to 
; binary 
; REAL_VAR now equals the encoded LONG_REAL value. For 
3 the sample given, REAL_VAR = -340. 


3-11 


The Decimal Conversion Library 80287 Support Library 


DECLOW_BIN — macDECLOW_BIN (Convert decimal string, 
low-level interface, to binary number) 


Parameter 


DECLOW_BIN_BLOCK_PTR, a double-word that points to a 13-byte block of 
memory. The block of memory contains six fields that hold the following variables: 


*  BIN_PTR, a double-word that points to the output binary number. The amount 
of memory space occupied by the number is determined by BIN_TYPE. 


* BIN_TYPE, a one-byte input code that indicates the type (SHORT_REAL, 
LONG_REAL, or TEMP_REAL) of the number pointed to by BIN_PTR. The 
codes for the types are 0, 2, and 3, respectively. The caller must ensure that 
BIN_TYPE is set to one of the indicated legal values; any other value gives an 
undefined result. 


¢ DEC_LENGTH, a one-byte input that indicates the length of the memory field 
pointed to by DEC_PTR. The length must be between | and 21, inclusive. Any 
other value gives an undefined result. If DEC_LENGTH equals 21, the original 
significand has more than 20 digits. In this case, the given significand consists of 
the first 20 digits only. The twenty-first digit is the least significant nonzero digit 
of the original significand. 


¢ DEC_PTR, a double-word that points to the input string of ASCII decimal digits. 
The digits give the significand of the number to be converted. Leading zeroes, 
the sign, the decimal point, the exponent, and lagging zeroes have already been 
removed. 


« DEC_EXPONENT, a word that gives the base-10 exponent of the number to be 
converted. It is assumed that the decima! point has been shifted to the immediate 
right of the last digit of the significand. DEC_EXPONENT is then the power of 
ten, which, when multiplied by the significand, yields the number to be converted. 
Negative powers are represented in two’s complement form. 


* DEC_SIGN, a byte that gives the sign of the number to be converted. The possi- 
ble values are ASCII “+” (2B hex) and ASCII “—” (2D hex). 


Function 


mqcDECLOW_BIN accepts a decimal number that has already been converted from 
a higher-level format to the lower-level format described under DEC_PTR, 
DEC_EXPONENT, and DEC_SIGN above. It converts the number into a binary 
floating-point number of type BIN_TYPE and leaves the number at the memory 
location pointed to by BIN_PTR. 


Errors 


All errors (invalid input, overflow, underflow, and inexact result) are the same as for 
mqcDEC_BIN and have the same consequences. 


Example of PL/M-286 Use 


mqcDECLOW_BIN: PROCEDURE CBLOCK_PTR) EXTERNAL; 
DECLARE BLOCK_PTR POINTER; 
END mqcDECLOW BIN; 


DECLARE REAL_VAR2@ REAL; 
DECLARE N_DIGITS BYTE; 
DECLARE DIGITS_BUFFER(C21) BYTE; 
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(ae at 
DI 


len 


Assume that 
placed into 
the string 
/* The following 
decimal string 
pennies. It pl 
binary format, 


BIN _DECLOW_BLOCK. 
BIN_DECLOW BLOCK. 
BIN _DECLOW_BLOCK. 
BIN _DECLOW_BLOCK. 
BIN_DECLOW_BLOCK. 
BIN_DECLOW_BLOCK. 


this point the 
GITS_BUFFER, 


gth 3 */ 


5 


code assumes 
representing an 
aces the number 
into REAL_VAR2. 


BIN_PTR 
BIN_TYPE = 
DEC_LENGTH 
DEC_PTR = 
DECLEXPONENT = 
DEC_SIGN = ‘4+’; 


@REAL_V 


-2 


SHORT_ 
N_DIGITS; 
@DIGITS_BUFFER; 


tring 


and N_DIGITS has 


DIGIT_BUFFER 


integ 


of dollars, 


a A 


AR23 
REAL; 


CALL mqcDECLOW_BINC@BIN_DECLOW_BLOCK); 


/* REAL_VAR2@ now 


Sle PE 


Example of ASM286 Use 


; This EXTRN must 
$ pairs: 

EXTRN mgcDECLOW_B 
N_DIGITS 
DIGITS_BUFFER 
REAL_VAR2 
BLOCK_2 


D 


; assume that the 
; DIGITS_BUFFER, 
; length Bi 


MOV AL,N_ 


MOV BLOCK_2.DEC_LENGTH, 


MOV DX, S$ 


PUSH DX 


MOV DX, O 


PUSH DX 
CALL mqcD 


; The 
; into 


encoded LON 
REAL_VAR2. 


equals the 


appear outside o 


IN: FAR 
0 
21 


Q 9 


f all 


DUP 
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"371" has been 


been set 


contains 
number of 
in 


a 
er 


encoded SHORT_REAL value 


SEGMENT-ENDS 


(7) 


DECLOW_BIN BLOCK < REAL_VAR2, 


LONG_REAL,?,DIGITS_BUFFER,-2,*+%> 


string "371" has 
and N_DIGITS has 


DIGITS 

AL 
EGC BLOCK_2) 
FFSETCBLOCK_2) 
ECLOW_BIN 


G_REAL value 3.71 


been 
been 


has 


into 
the string 


placed 
set to 


load 
place 
block 
top half 
block ptr 
goes onto 
bottom half of 
param block ptr 
goes onto stack 
convert string 
binary 


string 
into 


length 
param 


of param 


stack 


to 


now been placed 


to 


SHORT_REAL 
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LONG_TEMP — macloNnG_TEMP (Convert LONG_REAL to 
TEMP_REAL) 


Parameters 


LONG_REAL_PTR points to the eight bytes of memory that hold the input 
LONG_REAL binary floating-point number. 


TEMP_REAL_PTR points to the ten bytes of memory into which the TEMP_REAL 
answer is placed. 


Function 


The input LONG_REAL number is extended to the TEMP_REAL number that 
represents the same value. Unusual inputs (NaNs, infinities, —0) translate to the 
same unusual outputs, with zeroes padding the end of the output significand. 


Errors 


The only possible error is a denormalized input value. The corresponding denormal- 
ized output value is left in the output buffer. If the 80287 D exception is unmasked, 
the trap handler is called with the output on the 80287 stack. 


Example of PL/M-286 Use 


mgcLONG_TEMP: PROCEDURE CLONG_REAL_PTR,TEMP_REAL_PTR) 
EXTERNAL; 
DECLARE CLONG_REAL_PTR,TEMP_REAL_PTR) POINTER; 
END mqcLONG_TEMP; 


DECLARE TEMP_REAL_ARRAY (€8) STRUCTURE 

CSIGNIFICAND(8) BYTE, EXPO_SIGNC(2) INTEGER); 
DECLARE LONG_REAL_ARRAY (8) STRUCTURE CNUMC(8) BYTE); 
DECLARE I BYTE; 


/* The following code expands an array of LONG_REAL 
variables into an array of TEMP_REAL variables */ 


DO I = 0 TO 7; 

CALL mqcLONG_TEMP (€ @LONG_REAL_ARRAY(C1), 
@TEMP_REAL_ARRAYCI) ); 

END; 


Example of ASM286 Use 

; This EXTRN must appear outside of all SEGMENT-ENDS 
; pairs: 

EXTRN mgcLONG_TEMP: FAR 


TEMP_NUM DT ? 
LONG_NUM DQ ? 


+ The following code transfers the LONG_REAL number at 
; LONG_NUM to the TEMP_REAL number at TEMP_NUM 


MOV DX, SEGCLONG_NUM) ; top half of parameter 
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PUSH DX 
MOV DX, OFFSETCLONG_NUM) 


PUSH DX 
MOV DX, SEGCTEMP_NUM) 


PUSH DX 
MOV DX, OFFSETCTEMP_NUM) 


PUSH DX 
CALL mqcLONG_TEMP 
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pointer 1 

goes onto stack 
bottom half of 
parameter pointer 1 
goes onto stack 

top half of parameter 
pointer 2 

goes onto stack 
bottom half of 
parameter pointer 2 
goes onto stack 
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SHORT_TEMP — macSHoRT_TEMP (Convert SHORT_REAL 
to TEMP_REAL) 


Parameters 


SHORT_REAL_PTR points to the four bytes of memory that hold the input 
SHORT_REAL binary floating-point number. 


TEMP_REAL_PTR points to the ten bytes of memory into which the TEMP_REAL 
answer is placed. 


Function 


The input SHORT_REAL number is extended to the TEMP_REAL number, which 
represents the same value. Unusual inputs (NaNs, infinities, —0) translate to the 
same unusual outputs, with zeroes padding the end of the output significand. 


Errors 


The only possible error is a denormalized input value. The corresponding denormal- 
ized output value is left in the output buffer. If the 80287 D exception is unmasked, 
the trap handler is called with the output on the 80287 stack. 


Example of PL/M-286 Use 


mqcSHORT_TEMP: PROCEDURE CSHORT_REAL_PTR,TEMP_REAL_PTR) 
EXTERNAL; 
DECLARE CSHORT_REAL_PTR,TEMP_REAL_PTR) POINTER; 
END mqcSHORT_TEMP; 


DECLARE TEMP_REAL_ARRAY (€8) STRUCTURE CNUMC(10) BYTE); 
DECLARE SHORT_REAL_ARRAY (8) REAL; 
DECLARE I BYTE; 


/* The following loop expands an array of SHORT_REAL 
variables into an array of TEMP_LREAL variables. */ 


DO 1! = 0 TQ 7; 
CALL mqcSHORT_TEMP (€ @SHORT_REAL_ARRAY(CI), 
@TEMP_REAL_ARRAY(CI) ); 

END; 


Example of ASM286 Use 

; This EXTRN must appear outside of all SEGMENT-ENDS 
; pairs: 

EXTRN mgcSHORT_TEMP: FAR 


SHORT_X DD ? 
TEMP_xX DT ? 


; The following code converts the SHORT_REAL number at 
; SHORT_X into a TEMP_REAL, value, and leaves it at TEMP_X. 


; It is assumed that both numbers are in the DS segment. 
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PUSH DS 
MOV AX, OFFSETCSHORT_X) 


PUSH AX 
PUSH DS 


MOV AX, OFFSETCTEMP_X) 


PUSH AX 
CALL mqcSHORT_TEMP 


top half of 
parameter 
bottom half 
parameter 
pushed onto 
top half of 
parameter 
bottom half 
parameter 
pushed onto 
conversion 
complete 
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first 


of first 


stack 
second 


of second 


stack 


is now 
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TEMP_LONG — macTEMP_LONG (Convert TEMP_REAL to 
LONG_REAL) 


Parameters 


TEMP_REAL_PTR points to the ten bytes of memory that hold the input 
TEMP_REAL binary floating-point number. 


LONG_REAL_PTR points to the eight bytes of memory into which the 
LONG_REAL answer is placed. 


Function 


The TEMP_REAL number is rounded to the nearest. LONG_REAL number. If two 
LONG_REAL numbers are equally near, the one with a zero least significant bit is 
chosen. 


Errors 


mqcTEMP_LONG has five possible errors: 


1. Overflow. If the exponent of the TEMP_REAL input exceeds the output capac- 
ity, the correctly signed infinity is placed in the output buffer. If the 80287 O 
exception is unmasked, the trap handler is called. In this case, the number left 
on the 80287 stack is the input number, with the exponent unchanged and the 
significand rounded to the output’s precision. 


2. Uriderflow. The output buffer is filled with the result of gradual underflow, 
rounded to fit the output format. If the 80287 U exception is unmasked, the trap 
handler is called. In this case, the 80287 stack is left with the input number’s 
significand rounded to the output precision, with the too-small exponent 
unchanged. 


3. Inexact. This occurs when the input significand has nonzero bits outside the field 
of the output format. The correctly rounded answer is left in the output buffer. 
If the 80287 P exception is unmasked, the trap handler is called with the input 
number on the 80287 stack. 


4. Unnormalized invalid input. This occurs when the input is unnormalized, no 
underflow occurs, and rounding to the output precision does not normalize the 
answer. INDEFINITE is left in the output buffer. If the 80287 I exception is 
unmasked, the trap handler is called with the input number on the 80287 stack. 


5. Invalid nonzero NaN truncation. The only NaN inputs faithfully represented in 
the smaller format are those for which the significand bits being truncated are 
all zero. For other NaNs, invalid operation is signalled. The output buffer is 
filled with the truncated result only if the truncated significand is nonzero. If the 
significand is zero, it is made nonzero by substituting the highest nonzero byte 
of the original significand into bits 5 through 12 of the new LONG_REAL signi- 
ficand. If the 80287 I exception is unmasked, the trap handler is called with the 
input number on the 80287 stack. 


Example of PL/M-286 Use 


mqcTEMP_LONG: PROCEDURE CTEMP_REAL_PTR,LONG_REAL_PTR) 
EXTERNAL; 
DECLARE (TEMP_REAL_PTR,LONG_REAL_PTR) POINTER; 
END mqcTEMP_LONG; 
DECLARE TEMP_REAL_ARRAY (8) STRUCTURE CNUMC10) BYTE) 
DECLARE LONG_REAL_ARRAY (8) STRUCTURE CNUMC8) BYTE); 
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~ 


DECLARE I BYTE; 


/* The following code transfers an array of 8 TEMP_REAL 
numbers to an array of LONG_REAL numbers. */ 


DO I = 0 TO 7; 
CALL mqcTEMP_LONGC@TEMP_REAL_ARRAYC1), 
e@LONG_REAL_ARRAYCI)) ; 
END; 
Example of ASM286 Use 


his EXTRN must appear outside of all SEGMENT-ENDS 


: | 

; pairs: 

EXTRN mqcTEMP_LONG: FAR 
TEMP_REAL_ARRAY DT 8 DUP (?) 
LONG_REAL_ARRAY Da 8 DUP (?) 


; The following code transfers the array of 8 TEMP_REAL 
5 numbers in TEMP_LREAL_ARRAY to the 8 LONG_REAL numbers in 
; LONG_REAL_ARRAY. 


; It is assumed that both arrays are in the current DS 
$ segment. 


PUSH BP ; BP should always 
; be preserved 

MOV BP, OFFSETCLONG_REAL_ARRAY) 

MOV DX, OFFSETCTEMP_REAL_ARRAY) DX will not be 


preserved 


MOV CX, 8 initialize loop 

counter 
LOOPS: 

PUSH CX preserve counter 

PUSH DX preserve TEMP_REAL 
pointer 

PUSH DS top half of TEMP 
parameter 

PUSH DX bottom half of 
TEMP parameter 

PUSH DS top half of LONG 
parameter 

PUSH BP bottom half of 


LONG parameter 


CALL mqcTEMP_LONG perform conversion 


POP DX restore TEMP_REAL 
pointer 

ADD DX, 10 increment to next 
TEMP_REAL 

ADD BP, 8 increment to next 
LONG_LREAL 

POP CX restore counter 

DEC CX count down 

JNZ LOOPS loop back if more 

F conversions 
POP BP restore the 


original BP 


3-19 


The Decimal Conversion Library 80287 Support Library 


TEMP_SHORT — macTEMP_SHORT (Convert TEMP_REAL 
to SHORT_REAL) 


Parameters 


TEMP_REAL_PTR points to the ten bytes of memory that hold the input 
TEMP_REAL binary floating-point number. 


SHORT_REAL_PTR points to the four bytes of memory into which the 
SHORT_REAL answer is placed. 


Function 


The TEMP_REAL number is rounded to the nearest SHORT_REAL number. If 
two SHORT_REAL numbers are equally near, the one with a zero least significant 
bit is chosen. 


Errors 


The errors (overflow, underflow, inexact, invalid unnormalized, and invalid nonzero 
NaN truncation) are the same as for mqcTEMP_LONG, with the same actions taken 
except for the subcase of error 5—in which the highest nonzero byte of the original 
significand must be copied to the result significand to preserve its character as a 
NaN. In this case, that byte occupies bits 0 through 7 of the new SHORT_REAL 
significand. 


Example of PL/M-286 Use 


mqcTEMP_SHORT: PROCEDURE CTEMP_LREAL_PTR,SHORT_REAL_PTR) 
EXTERNAL; 
DECLARE CTEMP_LREAL_PTR,SHORT_REAL_PTR) POINTER; 
END mgcTEMP_SHORT; 


DECLARE TEMP_REAL_ARRAY (8) STRUCTURE 
(CSIGNIFICAND(8) BYTE, EXPO_SIGNC2) INTEGER); 

DECLARE SHORT_REAL_ARRAY (8) REAL; 

DECLARE I BYTE; 


/* The following loop transfers an array of 8 TEMP_REAL 
numbers (which could, for example, represent an image 
of the 80287 stack) to a more compact array of 
SHORT_REAL numbers. */ 


DOr = 0 TO 7; 
CALL mqcTEMP_SHORT (€ @TEMP_REAL_ARRAY(1), 
@SHORT_REAL_ARRAYCI) 3 

END; 


Example of ASM286 Use 


; This EXTRN must appear outside of all SEGMENT-ENDS 
} pairs: 
EXTRN mqcTEMP_SHORT: FAR 


TEMP_VAR DT ? 
SHORT_VAR DD ? 
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; The following code transfers the TEMP_REAL number at 


> TEMP_VAR to the SHORT_REAL number at SHORT_VAR 


MOV DX, SEGCTEMP_VAR) 
pointer 

goes onto stack 
bottom half of 
parameter pointer 
goes onto stack 


PUSH DX 
MOV DX, OFFSETCTEMP_VAR) 


PUSH DX 

MOV DX, SEGCSHORT_VAR) 
pointer 

goes onto stack 
bottom half of 
parameter pointer 
goes onto stack 


PUSH DX 
MOV DX, OFFSETCSHORT_VAR) 


PUSH DX 
CALL mqcTEMP_SHORT 


Binding DC287.LIB to Program Modules 


The final action you must take to use DC287.LIB in your programs is to insert the 
file name DC287.L1B into the BND286 command. You must also bind in 80287.LIB. 


Following is the suggested order for the object modules in your BND286 statement: 


Your object modules 

DC287.LIB 

CEL287.LIB (if you are using it) 
EH287.LIB (if you are using it) 
80287.LIB 


For example, if you are binding your PL/M-286 modules MYMODI.OBJ and 
MYMOD2.OBJ into a program, issue the following command: 


If you have a single ASM286-generated object module :FI:MYPROG.OBJ to be 
executed, issue the following command: 


top half of parameter 


top half of parameter 
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CHAPTER 4 
THE COMMON ELEMENTARY 


FUNCTION LIBRARY 


Overview 


This chapter describes the functions of CEL287.LIB, a library that contains 
commonly-used functions of floating-point arithmetic. 


The 80287 chip gives direct support for the most time-consuming part of the compu- 
tation of every CEL287 function, but the forms of the functions and the ranges of 
the inputs are limited. CEL287 provides the software support necessary to let the 
80287 provide a complete package of elementary functions, giving valid results for 
all appropriate inputs. 


All CEL287 procedure names begin with the four letters ger. This prefix has been 
added to reduce the possibility of conflict between a CEL287 name and another name 
in your program. The mger prefix appears in lowercase letters throughout this chapter 
to make the names more readable. 


Following is a summary of CEL287 grouped by functions. 


Rounding and Truncation Functions 


* mgerlEX rounds a real number to the nearest integer; to the even integer if a tie 
occurs. The answer returned is real. 


* maerlE2 is as mgerlEX, except the answer is a 16-bit integer. 
* mqgerlE4 is as mgerlEX, except the answer is a 32-bit integer. 


* mgerlAX rounds a real number to the nearest integer; to the integer away from 
zero if a tie occurs. The answer returned is real. 


* mgerlA2 is as mgerlAX, except the answer is a 16-bit integer. 
¢ mgerlA4 is as mgerIAX, except the answer is a 32-bit integer. 
* —mqaerICX chops the fractional part of a real input. The answer is real. 
* mgerIC2 is as mgerICX, except the answer is a 16-bit integer. 
* mgerIC4 is as mgerICX, except the answer is a 32-bit integer. 


Logarithmic and Exponential Functions 


* mgerLGD computes decimal (base 10) logarithms. 

* mgerLGE computes natural (base e) logarithms. 

* mqgerEXP computes exponentials of base e. 

* mqgerY2X computes exponentials of any base. 

* mgerY12 computes an input real to the AX integer power. 

¢  mgerY14 is as mgerY 12, except the input integer is DXAX. 

* mgerYIS is as mgerY12, except the input integer is on the 80286 stack. 


Trigonometric and Hyperbolic Functions 


* —mgerSIN, mgerCOS, mqerTAN compute sine, cosine, and tangent. 
* mgerASN, mqerACS, mgerATN compute the corresponding inverse functions. 
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* mgerSNH, mgerCSH, mqerTNH compute the corresponding hyperbolic 
functions. 


* mgerAT2 is a special version of the arc tangent function. It handles all the 
quadrants for rectangular-to-polar conversion in two dimensions. 


Other Functions 


* mgerDIM is FORTRAN’s positive difference function. 

* mqerMAX computes the maximum of two real inputs. 

« mqerMIN computes the minimum of two real inputs. 

¢ mqerSGH combines the sign of one input with the magnitude of the other input. 
¢« mgerMOD computes a modulus, retaining the sign of the dividend. 

*« mqerRMD computes a modulus, giving the value closest to zero. 


Declaring CEL287 Procedures in ASM286 Programs 


In each source program module that calls a CEL287 procedure, you must declare 
that procedure as external before it is used. 


Following are declarations you should make at the top of your ASM286 program. 
Include only those procedures you use. 


For easier referencing, the EXTRN statements in the examples for the individual 
functions have been duplicated. You should not duplicate the EXTRN statements in 
your program. 


All CEL287 procedures must be declared FAR. 


All of the following EXTRN statements should appear 
outside of all SEGMENT-ENDS pairs 


EXTRN mgerACS: FAR 
EXTRN mgerASN: FAR 
EXTRN mgerAT2: FAR 
EXTRN mqerATN: FAR 
EXTRN mgerCOS: FAR 
EXTRN mgerCSH: FAR 
EXTRN mgerDIM: FAR 
EXTRN mgerEXP: FAR 
EXTRN mgerlA2: FAR 
EXTRN mgerlA4: FAR 
EXTRN mgerlIAX: FAR 
EXTRN mqgerIC2: FAR 
EXTRN mgerliC4: FAR 
EXTRN mgqerICX: FAR 
EXTRN mqgerIE2: FAR 
EXTRN mgqerlE4: FAR 
EXTRN mgerlIEX: FAR 
EXTRN mgerLGD: FAR 
EXTRN mgerLGE: FAR 
EXTRN mgerMAX: FAR 
EXTRN mgerMIN: FAR 
EXTRN mgerMOD: FAR 
EXTRN mqerRMD: FAR 
EXTRN mqerSGN: FAR 
EXTRN mgerSIN: FAR 
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EXTRN mgerSNH: FAR 
EXTRN mqgerTAN: FAR 
EXTRN mgerTNH: FAR 
EXTRN mgerY2X: FAR 
EXTRN mgerYI2: FAR 
EXTRN mgerYI4: FAR 
EXTRN mqgerYIS: FAR 


Declaring CEL287 Procedures in PL/M-286 Programs 


Following are the declarations you should make at the top of your PL/M-286 
programs. Include only those procedures you use 


For easier referencing, the procedure declarations in the examples for the individual 
functions have been duplicated. You should not duplicate the declarations in your 
programs. 


To use CEL287.LIB, you must compile your PL/M-286 modules under the MEDIUM 
or LARGE computation models, because CEL287’s procedures are FAR procedures. 


mgerACS: PROCEDURE (CX) REAL EXTERNAL; 
DECLARE X REAL; 
END mqgerACS; 


mqerASN: PROCEDURE (X) REAL EXTERNAL; 
DECLARE X REAL; 
END mqgerASN; 


mqerAT2: PROCEDURE CY,X) REAL EXTERNAL; 
DECLARE CY,X) REAL; 
END mqgerAT2; 


mgerATN: PROCEDURE (X) REAL EXTERNAL; 
DECLARE X REAL; 
END mgerATN; 


mqgerCQOS: PROCEDURE (THETA) REAL EXTERNAL; 
DECLARE THETA REAL; 
END mgerCOS; 


mgerCSH: PROCEDURE (THETA) REAL EXTERNAL; 
DECLARE THETA REAL; 
END mgerCSH; 


mqerDIM: PROCEDURE CY,X) REAL EXTERNAL; 
DECLARE CY,X) REAL; 
END mgerDIM; 


mgerEXP: PROCEDURE (X) REAL EXTERNAL; 
DECLARE X REAL; 
END mqerEXP; 


mgerlA2: PROCEDURE (CX) INTEGER EXTERNAL; 


DECLARE X REAL; 
END mgerlA2; 
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mgerlAX: PROCEDURE (xX) 
DECLARE X REAL; 
END mgerlAX; 


mgerIC2: PROCEDURE (X) 
DECLARE X REAL; 
END mgerIC2; 


mgerICX: PROCEDURE (€X) 
DECLARE X REAL; 
END mgerICXx; 


mgqerlE2: PROCEDURE (X) 
DECLARE X REAL; 
END mgerlIE2; 


mgerlEX: PROCEDURE (CX) 
DECLARE X REAL; 
END mgerlEX; 


mqerLGD: PROCEDURE (X) 
DECLARE X REAL; 
END mgerLlGD; 


mqerLGE: PROCEDURE (CX) 
DECLARE X REAL; 
END mqerLGE; 


REAL EXTERNAL; 


INTEGER EXTERNAL; 


REAL EXTERNAL; 


INTEGER EXTERNAL; 


REAL EXTERNAL; 


REAL EXTERNAL; 


REAL EXTERNAL; 


mgerMAX: PROCEDURE CY,X) REAL EXTERNAL; 


DECLARE CY,X) REAL; 
END mgerMAX; 


mqerMIN: PROCEDURE CY,X) REAL EXTERNAL; 


DECLARE CY,X) REAL; 
END mgerMIN; 


mgerMOD: PROCEDURE CY,X) REAL EXTERNAL; 


DECLARE CY,X) REAL; 
END mgerMOD; 


mgerRMD: PROCEDURE CY,X) REAL EXTERNAL; 


DECLARE (Y,X) REAL; 
END mqgerRMD; 


mgerSGN: PROCEDURE CY,X) REAL EXTERNAL; 


DECLARE CY,X) REAL; 
END mqerSGN; 


mgerSIN: PROCEDURE CTHETA) 


DECLARE THETA REAL; 
END mgerSIN; 


mgerSNH: PROCEDURE (THETA) REAL EXTERNAL; 


DECLARE THETA REAL; 
END mgerSNH; 


mqerTAN: PROCEDURE CTHETA) REAL EXTERNAL; 


DECLARE THETA REAL; 
END mgerTAN; 


REAL EXTERNAL; 
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mgerTNH: PROCEDURE CTHETA) REAL EXTERNAL; 
DECLARE THETA REAL; 
END mgerTNH; 


mgerY2X: PROCEDURE (Y,X) REAL EXTERNAL; 
DECLARE C(Y,X) REAL; 
END mqerY2Xx; 


mgerYIS: PROCEDURE CY,1) REAL EXTERNAL; 
DECLARE Y REAL, I INTEGER; 
END mgerYIS; 


Calling CEL287 Functions in PL/M-286 Programs 


CEL287 functions operate with numbers on the 80287 stack; however, this fact is 
invisible to you when you are programming in PL/M-286. No PL/M statements 
explicitly load and unload numbers from the 80287 stack. The code for this is implic- 
itly generated whenever arithmetic involving REAL numbers is programmed. 


To invoke a CEL287 function after you have declared it, simply use the function in 
an assignment statement (or in an expression in any other context), All CEL287 
functions, if declared as shown in the examples, will cause the PL/M compiler to 
load the input parameters when CEL287 is invoked and to place the answer in the 
correct destination after the CEL287 procedure is complete. 


PL/M-286 does not support the LONG_REAL and TEMP_REAL formats. Numeric 
constants and variables used by PL/M are 32-bit SHORT_REAL numbers, in 80286 
memory, that are converted to TEMP_REAL when placed on the 80287 stack. When 
PL/M stores the result of a CEL287 function that returns a value on the 80287 
stack, the function is converted from TEMP_REAL to SHORT_REAL. The conver- 
sion takes place with an FSTP instruction generated by the compiler. 


The FSTP instruction may possibly generate an O overflow or a U underflow error. 
(Indeed, because TEMP_REAL is such a large format, this is where O and U errors 
are most likely to occur.) These errors are beyond the control of the CEL287 function; 
hence, the outlines in this chapter that cover the values placed into 80287 registers 
do not apply for these errors. 


Consult the iAPX 286 Programmer's Reference Manual Numeric Supplement for 
specifications of the FSTP instruction. 


Stack Use of CEL287 Procedures 


CEL287 requires 50 bytes of the 80286 stack for its internal storage. If, however, 
CEL287 is interrupted by a program that itself calls CEL287 (for example, an error 
trap handler), an additional 50 bytes of 80286 stack are needed for each recursion 
level possible. CEL287 declares a 50-byte STACK segment within its program 
modules, automatically allocating the first 50 bytes by BND286 or BLD286. 


CEL287 requires four stack positions on the 80287 stack. Input parameters are 
counted in the four numbers. This means that if a CEL287 function has input param- 
eters at the top two stack positions, ST(0) and ST(1), the parameters will be destroyed 
by the function. Also, the numbers ST(6) and ST(7), must be empty for the function 
to execute correctly. If the 80287 stack overflows during a CEL287 function, the 
results are undefined. 
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All CEL287 functions are reentrant in that they use no fixed 80286 memory locations 
to store internal variables. However, since the 80287 stack contains only eight 
elements, it is advisable for an interrupt routine to explicitly preserve the 80287 stack 
upon entry and to restore it upon exit. Any procedure that interrupts a CEL287 
function must save the entire 80287 stack, because it is impossible to tell which four 
stack elements are being used by CEL287. 


Register Use of CEL287 Procedures 


CEL287 conforms to the register-saving conventions of all 80286 high level languages 
provided by Intel. 


According to these conventions, the 80286 registers that can be destroyed by CEL287 
functions are AX, BX, CX, DX, DI, SI, and ES. The 80286 registers that are 
unchanged by CEL287 functions are BP, SS, and DS. The SP register is changed 
only by mgerYIS, which accepts a parameter on the 80286 stack and returns with 
the parameter popped from the stack. 


All CEL287 functions save the 80287 Control Word upon entry, and restore it upon 
return. During computation, all CEL287 functions except mqerDIM use 
TEMP_REAL precision, and a rounding mode of CEL287’s choosing. mgerDIM uses 
the precision and rounding in effect at the time mqerDIM is called. 


The 80287 exception flags (error bits) are treated by all CEL287 functions as “sticky.” 
This means that the only change to error bits that CEL287 may make is from off to 
on. If an error bit is already on when CEL287 is called, it will stay on. This allows 
you to perform a sequence of 80287 calculations that involve CEL287 functions with 
some of the 80287 errors masked. At the end of the calculation, if the exception flag 
for a masked error is still zero, you can be sure that the error was never encountered. 


Error Reporting in CEL287.LIB 


CEL287 incorporates the 80287 error-reporting mechanism. Whenever an error is 
detected, an appropriate 80287 exception bit is set. Using 80287 instructions, you can 
set your choice of unmasked bits and provide procedures that will be called whenever 
an unmasked exception is detected. This way, you do not have to test for errors every 
time you invoke a CEL287 function. 


There are only seven CEL287 functions that leave a meaningful value in the P preci- 
sion error bit. These are mgerIC2, mgerlC4, mqerICX, mqerIE2, mgerIE4, mgerlEX, 
and mgerSGN. For all other CEL287 functions, the P exception should be masked, 
and the P exception bit returned should be ignored. 


Whenever an unmasked exception is detected by any CEL287 function, the 80287 
calls the trap handler. The values on the 80287 stack are decribed under each individ- 
ual CEL287 function. In addition, CEL287 sets the following values whenever the 
trap handler is called: 


* The return address from the CEL287 function, consisting of the selector-offset 
pair, is placed in the memory operand pointer of the 80287. 


* The 80287 control word is restored to the value it had when the CEL287 function 
was called. 


¢ The 80287 instruction pointer offset is set to OFFFFF hex. 


¢ The 80287 opcode register is set to the code described under each CEL287 
function. The description gives the code in the form of three hexadecimal digits. 
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The first (most significant) digit gives the number of values remaining on the 
80287 stack that relate to the CEL287 function that caused the trap. The last 
two digits identify the CEL287 function. 


The trap handler can identify an interrupt as generated by CEL287 by examining 
the 80287 instruction offset to see that it is set to OFFFFF hex. If it is, then the 
identity of the CEL287 function is determined by examining the selector portion of 
the 80287 instruction pointer. 
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ACS — mqerACS X = arc cosine(x) 


Input Parameter 


(x) is the top number on the 80287 stack. 


Function 


mgerACS returns the number, in radians, whose cosine is equal to the input value. 
Results are in the range 0 to z. Valid inputs are from—1 to 1. All zeroes, pseudo- 
zeroes, and denormals return the value 7/2. Also, unnormals less than 2} return the 
value 7/2. 


Output 


The answer replaces the input on the 80287 stack. 


Errors 


Because cosines exist only in the range —1 to 1, all inputs to mqerACS outside 
of this range are invalid. Thus, an I error is given for infinities, NaNs, values less 
than —1, and values greater than 1. An I error is given also for unnormals not less 
than 2°. 


If I is unmasked, the trap handler is called with the input still on the stack, and the 
80287 opcode register set to 175 hex. If I is masked, the answer is the input for 
NaNs; the answer is the value INDEFINITE for other invalid inputs. 


Example of PL/M-286 Use 


mgerACS: PROCEDURE (X) REAL EXTERNAL; 
DECLARE X REAL; 
END mgerACS; 


DECLARE HYPOTENUSE REAL; /* Longest side of a right 

triangle */ 

DECLARE ADJACENT_SIDE REAL; /* The other side, next to 

angle computed */ 

DECLARE CTHETA_RADIANS, THETA_DEGREES) REAL; /* Two forms 
of the 
answer */ 

DECLARE PI LITERALLY *3.14159265358979'; 


HYPOTENUSE = 10.3; ADJACENT_SIDE = S.; 7* Test values */ 


/* The following lines calculate the value of an angle of 
a right triangle, given the length of the hypotenuse 
and the adjacent side. mqerACS returns the value in 
radians; the value is then converted to degrees. */ 


THETA_LRADIANS = mqerACS(€ ADJACENT_SIDE / HYPOTENUSE)D; 
THETA_DEGREES = €180./PI) * THETA_RADIANS; 


/* Now THETA_DEGREES = 60 -- it is a 30-60-90 degree 
triangle */ 
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; This EXTRN must appear outside of all SEGMENT-ENDS 
; pairs: 
EXTRN mqgerACS: FAR 
HYPOTENUSE DQ 10.0 3 longest side of a right 
; triangle 
ADJACENT_SIDE DQ 5.0 ; the other side, next to 
; angle computed 
5; The above initial values are test 
; values 
THETA_RADIANS DQ ? 
THETA_DEGREES DQ ? 
RAD_TO_DEG DT 4004ES2EE0DZ31E0FBDC3R 3; the constant 
; 180/P1 
; The following lines compute the angle of a right 
; triangle, just as in the above PL/M example, except 


; with LONG_REAL va 


FLD ADJACENT_SI 
FDIV HYPOTENUSE 


CALL mqerACS 
FST THETA_RADIA 
FLD RAD_TO_DEG 
FMUL 

FSTP THETA_DEGR 


Now THETA_DEGREES 


; triangle. 


riables. 


DE 


NS 


i 
EES j 
Hy 


(x) ADJACENT_SIDE 
(x) ADJACENT_SIDE/ 
HYPOTENUSE 
angle is now in 
radians result 


(x) 
is saved 


(x) converted 
degrees are saved, 
stack popped 


to degrees 
80287 


60 is a 30-60-90 
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ASN — mqerASN X = arc sine(x) 


Input Parameter 


(x) is the top number on the 80287 stack. 


Function 


mqerASN returns the number, in radians, whose sine is equal to the input value. 
Results are in the range —7/2 to 7/2. Valid inputs are from —1 to 1. All zeroes, 
pseudo-zeroes, and denormals return the input value. Also, unnormals less than 2° 
return the input value. 


Output 


The answer replaces the input on the 80287 stack. 


Errors 


Because sines exist only in the range —1 to | all inputs to mqerASN outside of this 
range are invalid. Thus, an I error is given for infinities, NaNs, values less than —1, 
and values greater than I. An I error is also given for unnormals not less than 2°, 


If I is unmasked, the trap handler is called, with the input still on the stack, and the 
80287 opcode register is set to 174 hex. If I is masked, the answer is the input for 
NaNs; the answer is the value INDEFINITE for other invalid inputs. 


Example of PL/M-286 Use 


mqerASN: PROCEDURE CX) REAL EXTERNAL; 
DECLARE X REAL; 
END mqerASN; 


DECLARE HYPOTENUSE REAL; 7* Longest side of a right 
triangle */ 
DECLARE OPPOSITE_SIDE REAL; /* The other side, opposite 
the angle computed */ 
DECLARE (THETA_RADIANS, THETA_DEGREES) REAL; /* Two forms 
of the 
answer */ 
DECLARE PI LITERALLY *3.14159265358979'; 


HYPOTENUSE = 10.3; OPPOSITE_SIDE = S.; /* Test values */ 


/* The following lines calculate the value of an angle of 
a right triangle, given the length of the hypotenuse 
and the opposite side. mqerASN returns the value in 
radians; it is then converted to degrees. */ 


THETA_RADIANS = mqgerACS( OPPOSITE_SIDE / HYPOTENUSE); 
THETA_DEGREES = (€180./PI1) * THETA_RADIANS; 


/* Now THETA_DEGREES = 30 -- it is a 30-60-90 degree 
triangle */ 
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i This EXTRN must appear outside of all SEGMENT-ENDS 
5 pairs: 
EXTRN mgerASN: FAR 
HYPOTENUSE Da 10.0 + longest side of a right 
; triangle 
GPPOSITE_SIDE DQ 5.0 ; the other side, next to 
3 angle computed 
; The abov initial values are test 
; values 
THETA_DEGREES DQ ? 
RAD_TO_DEG DT 4004ES2EE0DZ1E0FBDC3R ; the constant 
+ 180/PI 
; The following lines compute an angle of a right 
3; triangle, just as in the above PL/M example; except 


; with LONG_REAL variable 


FLD QPPOSITE_SIDE 
FDIV HYPOTENUSE 


(x) := OPPOSITE_SIDE 
(x) = GPPOSITE_SIDE/ 
HYPOTENUSE 


CALL mqerASN angle is now in (x) 
FLD RAD_TO_DEG 
FMUL 3 (x) converted to degrees 
FSTP THETA_DEGREES ; degrees are saved, 80287 
; stack popped 
; With the test inputs, THETA_DEGREES = 30; it is a 
; 30-60-90 triangle 
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AT2 — mqerAT2 X = arc tangent(y/x) 

Input Parameters 

(x) is the top number on the 80287 stack; (y) is the next number on the 80287 stack. 
Function 


mgerAT2 performs one half of a rectangular-to-polar coordinate conversion. If the 
inputs (x) and (y) are interpreted as the rectangular coordinates of a point in a plane, 
mqgerAT2 returns the angle, in radians, that the point is displaced from the positive 
X-axis. See figure 4-1. The angle ranges from —z (points just below the negative X- 
axis) to (points on or just above the negative X-axis). 


The formulas used to calculate the angle are as follows: 


If (x) > 0, return (arc tangent(y/x)). 
If (x) = 0, return mgerSGN (7/2, y). 
If (x) < 0, return (are tangent(y/x)) + mqerSGN (zr, y). 


It is legal for one (but not both) of the inputs to be an infinity. The point is then 
thought of as “infinitely far out” along one of the axes, and the angle returned is the 
angle of that axis. For points near the X-axis, the angle retains the sign of (y). Thus, 
x = +INFINITY returns 0 with the sign of (y); x = —INFINITY returns a with 
the sign of (y); y = +INFINITY returns +2/2; y = —INFINITY returns —7/2. 
In all these cases, it is legal for the non-infinite input to be unnormal. Also note that 
the distinction between +INFINITY and —INFINITY is made even when the 80287 
is in projective (unsigned infinity) mode. 


mgerAT2 accepts denormal inputs. Its action depends on whether the 80287 is in 
normalizing mode, as indicated by the setting of the D error masking bit. If the 80287 
is in normalizing mode (D is unmasked), any denormals are assumed to be zero. If 
the 80287 is in warning mode (D is masked), the denormals are replaced with unnor- 
mals having the same numeric value. Note that even though mqerAT2 checks the D 
masking bit, it does not set the D error bit; nor does it call the D trap handler. 


(X.Y) 


MerAT2IY.X) x ayig 


Figure 4-1. Rectangular-to-Polar Coordinate Conversion 121725-1 


Fe eee el) 
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In some cases, mgerAT2 accepts an unnormal input with no error. This can happen 
only when (y) and (x) represent the coordinates of a point that is extremely close to 
one of the axes. A point is considered close enough to the X-axis if the absolute value 
of (y/x) is less than 2*. A point is considered close enough to the Y-axis if the 
absolute value of (x/y) is less than 2°, If the point is near the positive X-axis, the 
value returned is the tiny ratio (y/x) with the sign of (y). If the point is near one of 
the other three axes, the value returned is the angle of that axis: 7 with the sign of 
(y) for the negative X-axis, +/2 for the positive Y-axis, and —2/2 for the negative 
Y-axis. Under no circumstances is it legal for both inputs to be unnormal. 


Output 
The 80287 stack pops once, with the answer replacing the two inputs. 
Errors 


The first thing mqerAT2 does is check for input NaNs. If either input is a NaN, an 
I error exists. If I is masked, the input NaN is returned (if both inputs are NaNs, 
the larger NaN is returned). 


An I error is given in a number of other cases. If both inputs are zero (i.e., the point 
on the coordinate plane is the origin), the angle cannot be defined: thus, an I error is 
given. If an unnormal input that does not fit any of the legal cases described above is 
given, an I error is given. For all these I errors, if I is masked, the value INDEFI- 
NITE is returned. 


If { is unmasked for any I error, the trap handler is called with the original inputs on 
the 80287 stack, and the 80287 instruction selector is set to 277 hex. 


If the magnitude of the result is too tiny to be represented in TEMP_REAL format, 
a U underflow error results. If U is masked, mqerAT2 returns a gradual underflow 
denormal if possible; 0 if not possible. If U is unmasked, the trap handler is called 
with the 80287 opcode register set to 277 hex, but the inputs are not left on the 80287 
stack. Instead, the correct answer is placed on the stack with the too-small exponent 
presented in “wrapped” form. To obtain the true exponent, subtract decimal 24576 
from the given exponent. 


Example of PL/M-286 Use 


mqgerAT2: PROCEDURE CY,X) REAL EXTERNAL; 
DECLARE CY,X) REAL; 
END mqerAT2; 


FSQRT287: PROCEDURE (€X) REAL EXTERNAL; 
DECLARE X REAL; 
END FSQ@RT287; 


/* The above procedure is simply a PUBLIC ASM286 procedure 
which consists of the FSQRT instruction, followed by a 
RET instruction. #*#/ 


DECLARE REC_X, REC_Y REAL; 
DECLARE (POLAR_THETA, POLAR_R) REAL; 


REC_X = 3.3; RECLY = 3. * FSQRT287(3.); 7* Test values */ 
/* The following statements convert the rectangular 


coordinates REC_X and REC_Y into the polar coordinates 
POLAR_R and POLAR_THETA. */ 
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POLAR_R = 
POLAR_THETA = 


/* Now POLAR_R = 


Example of ASM286 Use 


3 This EXTRN must 
} pairs: 
EXTRN mgerAT2: FAR 


POLAR_THETA DQG ? 


POLAR_R Da ? 
REC_X Da 3.0 
REC_Y DQ@ 3.0 
FLD REC_Y 
FLD REC_X 


CALL mqerAT2 
FSTP POLAR_THETA 


FLD REC_Y 

FMUL ST,ST 

FLD REC_X 

FMUL ST,ST 
FADDP ST(1),ST 
FSQRT 

FSTP POLAR_R 


3 Now POLAR_THETA 
; POLAR_R = 3 * 


FSQRT2870REC_X 
mgerAT2CREC_Y,REC_X); 


appear 


6 and POLAR_THETA = 


1 
? 
1 
. 
’ 
i 
i] 
. 
1 
? 


outside 


REC_X + 


rectangular 
initialized 
rectangular 
initialized 


Y-coordinate 
stack 
X-coordinate 
stack 
angle is 


REC_ 


of all 
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Y * REC_Y); 


PI/3. */ 


SEGMENT-ENDS 


coordinate 


to test value 


coordinate 


to test value 


parameter goes on 


parameter goes on 


computed 


and stored 


onto stack 
is squared 
onto stack 
X is squared 
sum of 
radius is on 
radius is 


popped 


x~<< 


PI/4 and 


Squareroot(2). 


stored and 


squares 


stack 
stack is 
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ATN — maqerATN X = arc tangent(x) 


Input Parameter 


(x) is the top number on the 80287 stack. 


Function 


mqerATN returns the number, in radians, whose tangent is equal to the input value. 
Numbers are chosen between —7/2 and 7/2. All zeroes, pseodo-zeroes, and denor- 
mals return the input value. Also, unnormals less than 2“? return the input value. 


Infinite inputs are valid, whether the 80287 is in affine (signed infinity) or projective 
(unsigned infinity) mode. The input —INFINITY returns the value —72; the input 
+INFINITY returns the value +72. 


Output 


The answer replaces the input on the 80287 stack. 


Errors 


An input NaN gives an I error. Also, an unnormal not less than 2° gives an I error. 
If I is masked, the answer returned is the input for NaNs; the answer is the value 
INDEFINITE for illegal unnormals. If I is unmasked, the trap handler is called with 
the input still on the 80287 stack and the value 176 hex in the 80287 instruction 
selector. 


Example of PL/M-286 Use 


mqerATN: PROCEDURE (X) REAL EXTERNAL; 
DECLARE X REAL; 
END mgerATN; 


DECLARE OPPOSITE_SIDE REAL; 

DECLARE ADJACENT_SIDE REAL; 7* Shorter sides of a right 
triangle */ 

DECLARE THETA_RADIANS REAL; 


OPPOSITE_SIDE = 1.3; ADJACENT_SIDE = 1.3; /* Test values */ 
/* The following line computes the angle of a right 
triangle, given the lengths of the two shorter 
sides. */ 


THETA_RADIANS = mqerATNCOPPOSITE_SIDE/*ADJACENT_SIDE); 


/* THETA_RADIANS now equals the value of the angle: 
PI/4. */ 


Example of ASM286 Use 


; This EXTRN must appear outside of all SEGMENT-ENDS 
} pairs: 
EXTRN mgerATN: FAR 
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OQPPOSITE_SIDE DQ@ 5.0 


ADJACENT_SIDE D@ S.0 


; short side, opposite angle 
3 computed 

i short side, next to angle 
; computed 

; The above initial values are test 

; values 


THETA_RADIANS DQ ? 


The following lines compute an angle of a right 
triangle, just as in the above PL/M example, except 
with LONG_REAL variables. 


FLD OPPOSITE_SIDE 
FDIV ADJACENT_SIDE 


3 Cx) :* OPPOSITE_SIDE 
3 (x) = OPPOSITE_SIDE/ 
; ADJACENT_SIDE 

CALL mqerATN . 

FSTP THETA_RADIANS H 

? 


angle is now in (x) 
radians are saved, 80287 
stack popped 


With the test inputs, THETA_RADIANS = PI/4., 
It is a 45-45-90 triangle. 
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CoS — mgerCOS X = cosine(x) 


Input Parameter 


(x) is the top number on the 80287 stack. 


Function 
mgerCOS returns the trigonometric cosine of x, where x is an angle expressed in 


radians. All input zeroes, pseudo-zeroes, and denormals return the value 1. Also, 
unnormals whose value is less than 2° return the value |. 


Output 


The answer replaces the input on the 80287 stack. 


Errors 


An [ error is given for input infinities and NaNs. An I error is also given for unnor- 
mals that do not represent values less than 2°. 


If I is unmasked, the trap handler is called with the input still on the stack, and the 
80287 opcode register is set to 172 hex. If I is masked, the answer is the input for 
NaNs; the answer is the value INDEFINITE for other invalid inputs. 


Example of PL/M-286 Use 


mqerCOS: PROCEDURE CTHETA) REAL EXTERNAL; 
DECLARE THETA REAL; 
END mgerCOS; 


DECLARE CPOLAR_R, POLAR_THETA) REAL; 
DECLARE REC_X REAL; 

DECLARE PI LITERALLY *3.14159265358979'; 
DECLARE DEG_TO_RAD LITERALLY ‘PI/180.°; 


POLAR_R = 2.3; POLAR_THETA = 30.; /* Test values */ 

/* The following line computes the X-coordinate of a 
polar-to-rectangular conversion. The input angle is in 
degrees, so it must be converted to radians. */ 


REC_X = POLAR_R * mqerCOSC(POLAR_THETA * DEG_TO_RAD); 


/* Now in the test case, REC_X = the square root of 3. A 


Example of ASM286 Use 


; This EXTRN must appear outside of all SEGMENT-ENDS 
j pairs: 
EXTRN mgerCOS: FAR 


POLAR_THETA DQ 30.0 

POLAR_R D@ 2.0 
; the above initializations are test 
; values. 
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REC_X DQ ? 
DEG_TO_RAD DT 3FFO8EFA351294E9C8AER ; the constant 
; PI/180. 
3 The following lines compute the X-coordinate of a 
3 polar-to-rectangular conversion, as in the PL/M 
; example above; except that the variables are 
; LONG_REAL. 
FLD POLAR_THETA ; degrees angle onto 80287 stack 
FLD DEG_TO_RAD 
FMUL ; converted to radians 
CALL mqgerCOS ; cosine is taken 
FMUL POLAR_R ; answer scaled to correct radius 
FSTP REC_X 3 X-coordinate stored and stack is 
i popped 
; With the test case, REC_X is now the square root of 
a ON, 
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CSH — mgqerCSH x = hyperbolic cosine(x) 


Input Parameter 


(x) is the top number on the 80287 stack. 


Function 

mgerCSH returns the hyperbolic cosine of x, where x is an angle expressed in radians. 
All input zeroes, pseudo-zeroes, and denormals return the value |. Also, unnormals 
whose value is less than 2 return the value I. 


Either infinity returns the value +INFINITY with no error. 


Output 


The answer replaces the input on the 80287 stack. 


Errors 


An I error is given for input NaNs. An I error is also given for unnormals that do 
not represent values less than 2°. 


If I is unmasked, the trap handler is called with the input still on the stack. If 1 is 
masked, the answer is the input for NaNs; the answer is the value INDEFINITE for 
invalid unnormals. 

mgerCSH gives an O overflow error if the input is greater than about 11355, or less 
than about — 11355. When O is masked, the value +INFINITY is returned. When 
O is unmasked, the trap handler is called with the input still on the 80287 stack. 


When the trap handler is called, mqerSNH first sets the 80287 instruction selector 
to 16F hex. 


Example of PL/M-286 Use 

mqerCSH: PROCEDURE (THETA) REAL EXTERNAL; 
DECLARE THETA REAL; 

END mqerCSH; 

DECLARE CINPUT_VALUE, QOUTPUT_VALUE) REAL; 

INPUT_VALUE = 1.3; /* Test value */ 

OUTPUT_VALUE = mgerCSHCINPUT_VALUE); 


/* For the test case, OQUTPUT_VALUE now is approximately 
1.97091 */ 


Example of ASM286 Use 
This EXTRN must appear outside of all SEGMENT-ENDS 


; 
} pairs: 
EXTRN mqerCSH: FAR 
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INPUT_VALUE 
QOUTPUT_VALUE 


FLD INPUT_VALUE 
CALL mgerCSH 
FSTP QUTPUT_VALUE 


; For the test value, 
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DQ@ 1. 
DQ ? 


56 


QUTPUT_VALUE 
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; test value 


onto 80287 
cosine is 
stored 


popped 


input goes 
hyperbolic 
answer is 
80287 is 


stack 
taken 
in 80286 memory, 


now is about 2.48448 
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DIM — mqerDIM X = max(y—x, +0) 


Input Parameters 


(x) is the top number on the 80287 stack; (y) is the next number on the 80287 stack. 


Function 


mqerDIM first compares (y) and (x); if (x) is greater than (y), the answer +0 is 
returned. If (y) is greater than (x), the positive value (y — x) is returned. 


When the 80287 chip is in affine (signed infinity) mode, and when both inputs are 
not the same, infinite inputs are allowed. The results are as expected from the above 
comparison and subtraction. That is, if (x) is +INFINITY or (y) is ~INFINITY, 
the answer is +0: if (x) is —INFINITY or (y) is +INFINITY, the answer is 
+INFINITY. 


mqerDIM uses the 80287 precision and rounding modes that are in effect when 
mgerDIM is called. Thus, the results can vary, depending on the settings of these bits 
in the 80287 control word. 


Output 


The 80287 stack pops once, with the answer replacing the two inputs. 


Errors 


The first error detected is the D error, which is for unnormal or denormal inputs. If 
the 80287 is in warning mode (D is masked), the calculation continues, but the D 
error bit remains set. If the 80287 is in normalizing mode (D is unmasked), the trap 
handler is called. The trap handler is called directly from the interior of mqerDIM; 
the 80287 instruction selector contains the code for the instruction that found the 
denormal: either FCOM or FSUB. The (y) and (x) inputs are left on the 80287 stack. 
Most trap handlers replace the denormal input(s) with normalized numbers, reexe- 
cute the FCOM or FSUB instruction, and continue through mqerDIM. The trap 
handler provided by EH287.LIB (described in Chapter 5) does these things and 
replaces denormals with zero. 


mgerDIM next checks for NaN inputs. If either input is a NaN, an I error is given. 
If I is masked, the answer returned is the input NaN (the larger NaN if both inputs 
are NaNs). 


An [error is also given if the 80287 chip is in projective (unsigned infinity) mode 
and either input is infinity, or if the 80287 chip is in affine (signed infinity) mode 
and both inputs are the same infinity. In these cases, a masked I yields the value 
INDEFINITE for an answer. 


For all I errors, when I is unmasked, the trap handler is called with the inputs still 
on the 80287 stack, and the 80287 instruction selector is set to 265 hex. 


In the case (y) > (x), when the answer is calculated by the subtraction (y — x), the 
subtraction can cause either an O overflow error or a U underflow error. If the error 
is masked, the answer returned is +INFINITY for overflow. For underflow, a 
gradual-underflow denormal is returned if possible; 0 is returned if not possible. If 
the error is unmasked, the trap handler is called, with the value 165 hex in the 80287 
instruction selector. The inputs are not on the 80287 stack. Instead, the correct answer 
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appears on the 80287 stack, with the out-of-range exponent given “wrapped around.” 
For underflow, the correct exponent is the given exponent minus the decimal value 
24576; for overflow, it is the exponent plus 24576. 


Example of PL/M-286 Use 


mgerDIM: 
DECLARE CY,X) 
END mgerDIM; 


PROCEDURE (CY,X) 


REAL EXTERNAL; 
REAL; 


DECLARE (COSTS, RECEIPTS) REAL; 

DECLARE (PROFIT, LOSS) REAL; 

COSTS = 4700.00; RECEIPTS = 5300.00; /* Test values */ 

/* The following lines return the profit or loss, given 
the costs and receipts. The positive difference goes 
into PROFIT or LOSS as appropriate, and the other value 
is set to zero. */ 

PROFIT = mgerDIMCRECEIPTS,COSTS); 

LOSS = mgqerDIMCCOSTS,RECEIPTS); 

/* For the test case, PROFIT is now 600.00, and LOSS 
is 0. */ 

Example of ASM286 Use 

i This EXTRN must appear outside of all SEGMENT-ENDS 

} pairs: 

EXTRN mgerDIM: FAR 

cosTs DQ 800.00 

RECEIPTS DQ@ 650.00 

; the above initializations are test cases 

PROFIT Da ? 

Loss Da ? 

i The following lines compute profit and loss, just as 

i in the PL/M example. 

FLD RECEIPTS ; first parameter to mgerDIM 

FLD COSTS ; second parameter to mqerDIM 

CALL mgerDIM i} positive difference is computed 

FSTP PROFIT } answer is stored and stack is popped 

FLD COSTS ; Now perform function the other way 

FLD RECEIPTS 

CALL mgerDIM 

FSTP LOSS ; other answer goes to LOSS, and stack 
; is again popped 

3 For this test case, LOSS = 150.00 and PROFIT is 0. 
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EXP — maqerEXP x ex 


Input Parameters 


(x) is the top number on the 80287 stack. 


Function 


mgerEXP raises the constant e (2.718281828459 +) to the power of the input number. 
This is a standard function because it is used to derive other functions, notably the 
hyperbolics. Also, on many computers it is slightly easier to compute than exponen- 
tials based on other constants. The exponential is valid for both positive and negative 
inputs. 


All input zeroes, pseudo zeroes, denormals, and unnormals less than 2 yield an 
answer of |. 


If the 80287 is in affine (signed infinity) mode, infinite inputs are valid. +INFIN- 
ITY returns itself as the answer; —INFINITY returns 0. 


Output 


The answer replaces the input on the 80287 stack. 


Errors 


All input NaNs and input unnormals greater than 2 cause an I error. Also, if the 
80287 is in projective (unsigned infinity) mode, both infinite inputs give an I error. 
If I is masked, the value returned is the input if a NaN; the value INDEFINITE 
otherwise. If I is unmasked, the trap handler is called with the input still on the 80287 
stack, 


Because the largest number that can be stored in the 80287’s temporary real format 
is approximately e!'*5’, an input greater than about 11357 causes an O overflow error. 
When O is masked, the value +INFINITY is returned. Likewise, an input less than 
about — 11355 causes the U underflow error. If U is masked, the result is a gradual- 
underflow denormal, if possible; zero otherwise. For unmasked O or U errors, the 
trap handler is called with the input still on the 80287 stack. 


When the trap handler is called, mqerEXP first places the value 16B hex into the 
80287 instruction register. 


Example of PL/M-286 Use 


mqerEXP: PROCEDURE (X) REAL EXTERNAL; 
DECLARE X REAL; 
END mqgerEXP; 


DECLARE Y_VALUE REAL; 
DECLARE X_VALUE REAL; 
DECLARE NORM_CONSTANT LITERALLY ‘0.3989422803'; 
7* 4 / CSARTC2*PI)D) */ 


X_VALUE = -2.0; /* Test value */ 
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7* The following lin 


normal distributi 


1. By plotting Y_VALUE 


X-values, obt 


curve’, 


one 
af 


Y_VALUE NORM_CONST 


* mger€ 
/* For the test 
0.5399100 */ 


inpu 


Example of ASM286 Use 


This EXTRN must 
pairs: 
XTRN mqgerEXP: 


ap 


E FAR 


MINUS_2 DQ 
X_VALUE 
Y_VALUE 
NORM _CONSTANT 


; The following 1 
3 just as in the 
; numbers. 


FLD X_VALUE 

FMUL ST,ST 

FIDIV MINUS_2 
CALL mqerEXP 

FLD NORM_CONSTANT 
FMUL 


FSTP Y_VALUE 


test ca 
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e 
on 


gives the value for 
function, for mean 
against various 
the familiar 


the graph of the 
0 and variance 
different input 


ains *‘*bell-shaped 


ANT 


XPC - X_VALUE * X_VALUE / 2, ); 
t, Y_VALUE is now approximately 
pear outside of all SEGMENT-ENDS 
-2. ; constant used in calculation 
; below 
0.4 ; initialization is a test value 


9 


3FFDCC42299EA1B28468R ; constant 
; i/sqrtC2*Pl) 


the 
except 


normal distribution 
with LONG_REAL 


ines compute 
PL/M example, 


load input onto 80287 stack 
input is squared 
negate and divide 


exponentiate 


by 2 


divide the root of 
a | 


i 
H 
; store 
5 stack 


by square 


the result and pop the 


se Y_VALUE is now about 0.3399562 
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IA2 — mgerlA2 AX = roundaway(x) 


Input Parameter 


(x) is the top number on the 80287 stack. 


Function 

If x is not normal, it is first normalized. Then, x is rounded to the nearest integer. If 
two integers are equally near (i.e., the fractional part of x is .5), the integer farthest 
from zero is selected. The answer is given in 16-bit two’s complement form. For 


example, 3.1 returns hex 0003; 10.5 returns hex 000B; —2.5 returns hex FFFD, which 
is —3 in two’s complement form. 


Output 


The input is popped from the 80287 stack and the answer is left in the AX register. 


Errors 

The only numbers that will fit the 16-bit destination are those between, but not 
including, —32768.5 and +32767.5. Numbers not in this range, including infinities 
and NaNs, cause an I error. If I is masked, the “indefinite integer” value 8000 hex 


is returned. If I is unmasked, the trap handler is called with the input still on the 
80287 stack, and the 80287 instruction selector is set to 17E hex. 


Example of PL/M-286 Use 

mqerlA2: PROCEDURE (X) INTEGER EXTERNAL; 
DECLARE X REAL; 

END mgerlA2; 


DECLARE REAL_VAR REAL; 
DECLARE INTEGER_VAR INTEGER; 


REAL_VAR = 4.5; /* Test value */ 
INTEGER_VAR = mgerlA2CREAL_VAR); 


7/* Now in the test case, INTEGER_VAR = 0005 hex. */ 


Example of ASM286 Use 
This EXTRN must appear outside of all SEGMENT-ENDS 
pairs: 


H 
EXTRN mgerlA2: FAR 


INTEGER_VAR DH ? 


REAL_VAR DQ -8.5 ; Initialization is a test value 
FLD REAL_VAR ; load the parameter 
CALL mgerlA2 ; round to nearest integer 
MOV INTEGER_VAR, AX ; store the answer 


; For the test case, INTEGER_VAR now equals -9, which 
; is FFF? hex. 
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IA4 — maerlA4 DXAX = roundaway(x) 


Input Parameter 


(x) is the top number on the 80287 stack. 


Function 


If x is not normal, it is first normalized. Then, x is rounded to the nearest integer. If 
two integers are equally near (i.e., the fractional part of x is .5), the integer farthest 
from zero is selected. The answer is given in 32-bit two’s complement form. For 
example, 3.1 returns hex 00000003; 10.5 returns hex 0000000B; —2.5 returns hex 
FFFFFFFD, which is —3 in two’s complement form. 


Output 


The input is popped from the 80287 stack, and the answer is left in the DX and AX 
registers, with DH the highest byte and AL the lowest byte. 


Errors 


The only numbers that will fit the 32-bit destination are those between, but not 
including, —2147483648.5 and +2147483647.5. Numbers not in this range, includ- 
ing infinities and NaNs, cause an I error. If I is masked, the “indefinite integer” 
value 80000000 hex is returned. If I is unmasked, the trap handler is called with the 
input still on the 80287 stack, and the 80287 instruction selector is set to 168 hex. 


Example of PL/M-286 Use 


Because PL/M-286 does not support a 32-bit integer data type, mgerlA4 cannot be 
used by PL/M programs. You should use either mgerlA2 or mgerIAX. 


Example of ASM286 Use 


; This EXTRN must appear outside of all SEGMENT-ENDS 
} pairs: 
EXTRN mqerlA4: FAR 


COUNT DD ? 
REAL_COUNT DQ 100000.5 ; initialized to a test v 


; The following code assumes that the above variables 

; in the DS segment. 
FLD REAL_COUNT load the parameter onto th 

80287 stack 

convert the number to 32 b 

point to the destination 

move lower 16 bits of answ 


CALL mgerlA4 

MOV BX,OFFSETC COUNT) 
MOV (CBX1,AX 

MOV [CBX+2],DX 


; With the test input, COUNT is now 100001, which 
; O00186A1 hex. 


80287 Support Library 


alue 


are 


e 


its. 


er 


move upper 16 bits of answer 


is 
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IAX — mqaerlAX X = roundaway(x) 


Input Parameter 


(x) is the top number on the 80287 stack. 


Function 

If x is not normal, it is first normalized. Then, x is rounded to the nearest integer. If 
two integers are equally near (i.¢., the fractional part of x is .5), the integer farthest 
from zero is selected. For example, 3.3 returns 3; 4.5 returns 5; —6.5 returns —7. 


Infinite values are returned unchanged, with no error. 


Output 


The answer replaces the input on the 80287 stack 


Errors 
The I error is set if the input is a NaN. The NaN is left unchanged. If the I error is 


unmasked, the trap handler is called with the 80287 instruction selector set to 167 
hex. 


Example of PL/M-286 Use 

mgerlAX: PROCEDURE (X) REAL EXTERNAL; 
DECLARE X REAL; 

END mgerlAX; 

DECLARE CHOURS, MINUTES) REAL; 

HOURS = 2.71; /* Test value */ 


/* The following statement converts HOURS into an integer 
number of MINUTES #/ 


MINUTES = mgerlAXCHOURS*60.); 


/* Now MINUTES = 163, */ 


Example of ASM286 Use 


; This EXTRN must appear outside of all SEGMENT-ENDS 
; pairs: 
EXTRN mqerlIAX: FAR 


HOURS Da 2a7t ; initialized to test value 
MINUTES DQ ? 
SIXTY DD 60.0 


; The following lines convert HOURS into an integer number 
; of MINUTES. It does the same thing as the above PL/M 
; example, only with LONG_REAL numbers. 
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FLD HOURS ; put HOURS onto 80287 stack 

FMUL SIXTY ; convert to a real number of MINUTES 
CALL mqerlAX ; round to the nearest integer 

FSTP MINUTES ; store the integer in LONG_REAL format 


; With the test case, MINUTES is now 163.0 
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IC2 — mgeriC2 AX = chop(x) 


Input Parameter 


(x) is the top number on the 80287 stack. 


Function 


If x is not normal, it is first normalized. Then, if x is an integer, it is returned 
unchanged, If x is not an integer, the fractional part of x is chopped. Thus, the nearest 
integer in the direction of 0 is returned. The answer is given in 16-bit two’s comple- 
ment form. For example, 4 returns hex 0004; 11.7 returns hex 000B; —6.9 returns 
hex FFFA, which is —6 in two’s complement form. 


Output 


The input is popped from the 80287 stack, and the answer is left in the AX register. 


Errors 


The only numbers that will fit the 16-bit destination are those between, but not 
including, —32769 and +32768. Numbers not in this range, including infinities and 
NaNs, cause an I error. If I is masked, the “indefinite integer” value 8000 hex is 
returned. If I is unmasked, the trap handler is called with the input still on the 80287 
stack, 


Note that “indefinite integer” can also represent the legal output value — 32768. The 
two outputs can be distinguished only by the setting of the I exception bit of the 
80287. 


If a truncation does take place, the P error is set. If P is masked, the answer is returned 
as usual, because this is usually considered no error. If P is unmasked, the trap handler 
is called. Because the output in the AX register is likely to be lost before the trap 
handler can use it, it is best not to unmask the P exception. 


If either trap handler is called, the 80287 instruction selector is first set to 17E hex. 


Example of PL/M-286 Use 


mqerIC2: PROCEDURE (X) INTEGER EXTERNAL; 
DECLARE X REAL; 
END mgerICe2; 


DECLARE CONTROL_SETTING INTEGER; 
DECLARE REAL_INPUT REAL; 


REAL_INPUT = 37.885; /* Test value */ 

/* The following line translates REAL_INPUT, which could 
have been calculated using floating-point arithmetic, 
into an INTEGER value CONTROL_SETTING, which might be 
output as up to 16 logic lines to a physical device. */ 

CONTROL_SETTING = mqerIC2(REAL_INPUT); 


/* For the test input, CONTROL_SETTING is now 37; which is 
C025 hex. *7 
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; This EXTRN must appear outside of all SEGMENT-ENDS 
3 pairs: 
EXTRN mgerIC2: FAR 
REAL_INPUT Da 65.7 ; initialized to a test 
; value 
CONTROL_SETTING DW 0 
3 The following lines convert the REAL_INPUT into the 
; 16-bit integer value CONTROL_SETTING, just as in the 
; PL/M example above, except that REAL_INPUT is a 
; LONG _REAL number. 
FLD REAL_INPUT 3 load the input onto the 80287 
3; stack 
CALL mgerIC2 3 chop to the integer part 
MOV CONTROL_SETTING,AX ; store the 16-bit answer 


the 
hex. 


: Ror test 


3 41 


input value, 
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1C4 — maeric4 DXAX = chop(x) 


Input Parameter 


x is the top number on the 80287 stack. 


Function 


If x is not normal, it is first normalized. Then, if x is an integer, it is returned 
unchanged. If x is not an integer, the fractional part of x is chopped. Thus, the nearest 
integer in the direction of 0 is returned. The answer is given in 32-bit two’s comple- 
ment form. For example, 4 returns hex 00000004; 11.7 returns hex 0000000B; —6.9 
returns hex FFFFFFFA, which is —6 in two’s complement form. 


Output 


The input is popped from the 80287 stack, and the answer is left in the DX and AX 
registers, with DH the highest byte and AL the lowest byte. 


Errors 


The only numbers that will fit the 32-bit destination are those between, but not 
including, —2147483649 and +2147483648. Numbers not in this range, including 
infinities and NaNs, cause an I error. If I is masked, the “indefinite integer” value 
80000000 hex is returned. If I is unmasked, the trap handler is called with the input 
still on the 80287 stack. 


Note that “indefinite integer” can also represent the legal output value — 2147483648. 
The two outputs can be distinguished only by the setting of the I exception bit of the 
80287. 


If a truncation does take place, the P error is set. If P is masked, the answer is returned, 
as usual, because this is usually considered no error. If P is unmasked, the trap handler 
is called. Because the output in the DXAX registers is likely to be lost before the 
trap handler can use it, it is best not to unmask the P exception. 


If either trap handler is called, the 80287 instruction selector is first set to 179 hex. 


Example of PL/M-286 Use 


Because PL/M-286 supports no 32-bit integer data type, mgerIC4 cannot be used by 
PL/M programs. You should use either mqerlC2 or mgerICX. 


Example of ASM286 Use 


; This EXTRN must appear outside of all SEGMENT-ENDS 
3 pairs: 
EXTRN mgerIC4: FAR 


total number of voters 
proportion of 
population supporting 
us above numbers are 
initialized to test 
values 


POPULATION Da 5306279.0 
SUPPORT_SHARE Da .39 
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SUPPORT_VOTES DD ? 
i; The following lines calculate the number of voters 
; Supporting an issue, given the total population, and the 
3 fractional share of the population which supports the 
; issue. This is simply the share multiplied by the 
; total, then chopped to a 32-bit integer SUPPORT_VOTES. 
FLD POPULATION ; load total onto 
; 80287 stack 
FMUL SUPPORT_SHARE ; multiply by share 
CALL mgerIC4 ; chop to 32 bits 
MOV WORD PTR SUPPORT_VOTES, AX ; store bottom 16 
j bits 
MOV WORD PTR (SUPPORT_VOTES+2), DX 3; store top 16 bits 
; With the test inputs, SUPPORT_VOTES is now 2069448, 
; which is 001F93C8 hex. 


80287 Support Library 
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ICX — maerlCX x = chop(x) 
Input Parameter 


(x) is the top number on the 80287 stack. 


Function 

If x is not normal, it is first normalized. Then, if x is an integer, it is returned 
unchanged. If x is not an integer, the fractional part of x is chopped. Thus, the nearest 
integer in the direction of 0 is returned. For example, 4 returns 4, —3.9 returns —3; 
1.7 returns |. 


Infinite values are returned unchanged, with no error. 


Output 
The answer replaces the input on the 80287 stack. 
Errors 


If a truncation does take place, the P error is set. The correct answer is on the 80287 
stack. If P is unmasked (this is rarely done), the trap handler is then called. 


The I error is set if the input is a NaN. The NaN is left unchanged; if the I error is 
unmasked, the trap handler is called. 


If either trap handler is called, the 80287 instruction selector is first set to 166 hex. 


Example of PL/M-286 Use 


mqerICX: PROCEDURE €(X) REAL EXTERNAL; 
DECLARE X REAL; 
END mgerICX; 


DECLARE PRICE_DOLLARS REAL; 
PRICE_DOLLARS = 37.596; 7* Test value */ 


/* The following statement chops PRICE_DOLLARS to an even 
number of pennies. First, PRICE_DOLLARS is multiplied 
by 100 to get a number of pennies; second, the pennies 
are chopped by mqerICX; third, the answer is divided by 
100 to convert back into dollars. */ 


PRICE_DOLLARS = € mqerICXC(PRICE_DOLLARS * 100.) / 100. ) ; 
/* Now PRICE_DOLLARS = 37.59 */ 
Example of ASM286 Use 

This EXTRN must appear outside of all SEGMENT-ENDS 


} pairs: 
EXTRN mgerICX: FAR 


PRICE_DOLLARS Da 37.596 ; initialized to a test 
>; value 
ONE_HUNDRED DD 100.00 ; constant which is used 


twice below 


rary 
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3 The following lines 
; of pennies, just as 
3 that PRICE_DOLLARS 


FLD PRICE_DOLLARS 
FMUL 


CALL 
FDIV 


ONE_HUNDRED 
mgqerICx 
ONE_HUNDRED 


FSTP PRICE_DOLLARS 


; With the above test 


chop PRICE_DOLLARS 
in the PL/M example 
is here 
amount is load 
stack 
amount 
pennies 
amount 

dollars 
converted 
80287 


is conv 
are ch 
is 


i 
H 
H 
3 
3 
i 
H 
; stack 


is 


input, PRICE_DOLLAR 


converted back 


number 


80287 Support Library 


number 
except 


to an even 
above, 


a LONG_REAL variable. 


ed onto 80287 


erted to 


opped 


pennies 
to 


is stored, 
popped 


S is now 37.59 
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IE2 — mqerlE2 AX = roundeven(x) 


Input Parameter 


(x) is the top number on the 80287 stack. 


Function 


If x is not normal, it is first normalized. Then, x is rounded to the nearest integer. If 
two integers are equally near (i.e., the fractional part of x is .5), the even integer is 
selected. The answer is given in 16-bit two’s complement form. For example, 3.1 
returns hex 0003; 10.5 returns hex QOOA; —2.5 returns hex FFFE, which is —2 in 
two’s complement form. 


Output 


The input is popped from the 80287 stack and the answer is left in the AX register. 


Errors 


The only numbers that will fit the 16-bit destination are those greater than or equal 
to —32768.5 and less than +32767.5. Numbers not in this range, including infinities 
and NaNs, cause an | error. If I is masked, the “indefinite integer” value 8000 hex 
is returned. If I is unmasked, the trap handler is called with the input still on the 
80287 stack. 


If a rounding does take place, the P error is set. If P is masked, the answer is returned, 
as usual, because this is usually considered no error. If P is unmasked, the trap handler 
is called. Because the output in the AX register is likely to be lost before the trap 
handler can use it, it is best not to unmask the P exception. 


When the trap handler is called, the 80287 instruction selector is first set to 180 hex. 


Example of PL/M-286 Use 

mgerlE2: PROCEDURE (X) INTEGER EXTERNAL; 
DECLARE X REAL; 

END mgerlE2; 


DECLARE REAL_VAR REAL; 
DECLARE INTEGER_VAR INTEGER; 


REAL_VAR = 4.5; 7* Test value */ 
INTEGER_VAR = mgerlE2CREAL_VAR) ; 


/* Now in the test case, INTEGER_VAR = 0004 hex. */ 


Example of ASM286 Use 


This EXTRN must appear outside of all SEGMENT-ENDS 


; pairs: 
EXTRN mqerlE2: FAR 


INTEGER_VAR DW ? 
REAL_VAR Da -8.5 ; Initialization is a test value 
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FLD REAL_VAR 
CALL mgerlE2 


MOV 


5) 


For 
is 


the 


test 


FFF8 hex. 


INTEGER_VAR, AX 


case, 


; load the 
; round to 
; store the 


INTEGER_VAR 


parameter 


80287 Support Library 


nearest integer 


answer 


now equals 


-8, which 
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IE4 — mqaerlE4 DXAX = roundeven(x) 


Input Parameter 


(x) is the top number on the 80287 stack. 


Function 


If x is not normal, it is first normalized. Then, x is rounded to the nearest integer. If 
two integers are equally near (i.e., the fractional part of x is .5), the even integer is 
selected. The answer is given in 32-bit two’s complement form. For example, 3.1 
returns hex 00000003; 10.5 returns hex OOOOOO0A; —2.5 returns hex FFFFFFFE, 
which is —2 in two’s complement form. 


Output 


The input is popped from the 80287 stack, and the answer is left in the DX and AX 
registers, with DH the highest byte and AL the lowest byte. 


Errors 


The only numbers that will fit the 32-bit destination are those greater than or equal 
to —2147483648.5 and less than +2147483647.5. Numbers not in this range, 
including infinities and NaNs, cause an J error. If J is masked, the “indefinite integer” 
value 80000000 hex is returned. If I is unmasked, the trap handler is called with the 
input still on the 80287 stack. 


If a rounding does take place, the P error is set. If P is masked, the answer is returned, 
as usual, because this is usually considered no error. If P is unmasked, the trap handler 
is called. Because the output in the DXAX registers is likely to be lost before the 
trap handler can use it, it is best not to unmask the P exception. 


When the trap handler is called, the 80287 instruction selector is first set to 17B hex. 


Example of PL/M-286 Use 


Because PL/M-286 supports no 32-bit integer data type, mgerIE4 cannot be used by 
PL/M programs. You should use either mgerIE2 or mqgerlEX. 


Example of ASM286 Use 


; This EXTRN must appear outside of all SEGMENT-ENDS 
} pairs: 
EXTRN mqerlE4: FAR 


COUNT DD ? 
REAL_COUNT Da 100000.5 ; initialized to a test value 


5 The following code assumes that the above variables are 

; in the DS segment. 
FLD REAL_COUNT load the parameter onto 

the 80287 stack 

convert the number to 32 

bits. 

move lower 16 bits of 


CALL mqerlE4 


MOV WORD PTR COUNT, AX 
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MOV WORD PTR 


(COUNT+2), 


; With the test input, 
; 000186A0 hex. 


DX 


COUNT 


answer 
move upper 
answer 


80287 Support Library 


16 bits of 


now 100000, which is 
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IEX — maqerlEX X = roundeven(x) 


Input Parameter 


(x) is the top number on the 80287 stack. 

Function 

If x is not normal, it is first normalized. Then, x is rounded to the nearest integer. If 
two integers are equally near (i.e., the fractional part of x is .5), the even integer is 


selected. For example, 3.3 returns 3; 4.5 returns 4; —6.5 returns —6. 


Infinite values are returned unchanged, with no error. 


Output 


The answer replaces the input on the 80287 stack. 


Errors 


If a rounding does take place, the P error is set. The correct answer is on the 80287 
stack. If P is unmasked (this is rarely done), the trap handler is then called. 


The I error is set if the input is a NaN. The NaN is left unchanged; if the I error is 
unmasked, the trap handler is called. 


If either trap handler is called, the 80287 instruction selector is first set to 178 hex. 


Example of PL/M-286 Use 

mqerlEX: PROCEDURE (€X) REAL EXTERNAL; 
DECLARE X REAL; 

END mgerlIEX; 


DECLARE UNITS REAL; 
DECLARE THOUSANDS REAL; 


UNITS = 4500.00; /* Test value */ 


/* The following line computes an integer number of 
thousands, given an input number of units. */ 


THOUSANDS = mgerlEXCUNITS/1000.); 
/* With the test input value, THOUSANDS now equals 4.00 */ 
Example of ASM286 Use 

This EXTRN must appear outside of all SEGMENT-ENDS 


i 
} pairs: 
EXTRN mgerlIEX: FAR 


THOUSANDS Da @ 

UNITS Da 5890.14 ; initialization is a test 
; value 

ONE_GRAND DD 1000.00 ; constant for the division 
; below 
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; The following lines 
; thousands, just as 
3 LONG_REAL variables 


FLD UNITS 

FDIV ONE_GRAND 
CALL mgerlIEX 
FSTP THOUSANDS 


; With the 


4-40 


i 


80287 Support Library 


compute an integer number of 
n the PL/M example above, except the 
are used. 
; load the input onto the 80287 stack 
; convert to thousands 
; round to an integer value 
3 store it into 80286 memory and pop 
; the 80287 stack 

THOUSANDS is now 6.00 


test value, 
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LGD — mqerLGD Xx = common log(x) 


Input Parameter 


(x) is the top number on the 80287 stack. 


Function 


mqerLGD returns the number L, with 10! equalling the input number. For positive 
inputs, this is a well-defined number. For example, an input 10 gives 1; 100 gives 2; 
.001 gives —3. Inputs between 10 and 100 give outputs between | and 2. 


If the 80287 processor is in affine (signed infinity) mode, the input +INFINITY is 
also valid, returning itself as an answer. 


Output 


The answer replaces.the input on the 80287 stack. 


Errors 


Negative numbers (including —INFINITY), all NaNs, and all unnormals give an I 
error. Also, when the 80287 is in projective (unsigned infinity) mode, both values of 
INFINITY give an I error. If | is masked, the result is the input for NaNs; the result 
is the value INDEFINITE for other invalid inputs. If I is unmasked, the trap handler 
is called wth the input number still on the 80287 stack. 


Zero input, of either sign, gives a Z error. If Z is masked, the result is ~INFINITY. 
If Z is unmasked, the trap handler is called with the input number still on the 80287 
stack, 


If the input is a denormal, mqerLGD tests the 80287 D exception bit to see if the 
80287 is in normalizing mode. If in normalizing mode (D unmasked), the input is 
treated as a zero, and a Z error is issued. If not in normalizing mode (D masked), 
the input is treated as an unnormal, and an I error is issued. Note that even though 
the D masking bit is tested, the D error is never issued by mgerLGD, and the D trap 
handler is never called during mqerLGD. 


Whenever the trap handler is called, the number 16D hex is first placed into the 
80287 instruction selector. 


Example of PL/M-286 Use 

mgerLGD: PROCEDURE (X) REAL EXTERNAL; 
DECLARE X REAL; 

END mgerLGD; 


DECLARE QUANTITY REAL; 
DECLARE TENS_POWER REAL; 


QUANTITY = 1900.00; 7* Test value */ 
TENS _POWER = mgerLGDCQUANTITY); 
/* Since the test value QUANTITY is between 10 ** 3 and 


10 ** 4, the answer TEST_POWER is between 3 and 4. It 
is about 2.27875. *% 
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Example of ASM286 Use 
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; This EXTRN must appear outside of all SEGMENT-ENDS 

; pairs: 

EXTRN mqgerLGD: FAR 

QUANTITY Da .0001 ; initialized to a test value 

TENS_POWER Da 2 

; The following code implements the above PL/M call in 

; assembly language, with LONG_REAL variables. 
FLD QUANTITY ; load input onto 80287 stack 
CALL mgerLGD ; take the base 10 logarithm 
FSTP TENS_POWER ; store the answer and pop the 

; 80287 stack 

; Since the test input was 10 ** -4, the output should be 

; -4.00. Due to accumulated rounding errors, it may not 

; be the exact integer. 


80287 Support Library The Common Elementary Function Library 


LGE — maqerLGE X = natural log(x) 


Input Parameter 


(x) is the top number on the 80287 stack. 


Function 


mgerLGE returns the number L, with e! equalling the input number. The constant e 
is 2.718281828459+. This logarithm is called ‘tnatural” because it occurs in calculus 
as the inverse derivative of 1/X; on many computers it is slightly easier to compute 
than other logarithms. For positive inputs, the logarithm is a well-defined number. If 
the 80287 processor is in affine (signed infinity) mode, the input +INFINITY is 
also valid, returning itself as an answer. 


Output 


The answer replaces the input on the 80287 stack. 


Errors 


Negative numbers (including —INFINITY), all NaNs, and all unnormals give an | 
error. Also, when the 80287 is in projective (unsigned infinity) mode, both values of 
INFINITY give an I error. If I is masked, the result is the input for NaNs; the result 
is the value INDEFINITE for other invalid inputs. If I is unmasked, the trap handler 
is called with the input number still on the 80287 stack. 


Zero input, of either sign, gives a Z error. If Z is masked, the result is — INFINITY. 
If Z is unmasked, the trap handler is called with the input number still on the 80287 
stack. 


If the input is a denormal, mgerLGE tests the 80287 D exception bit to see if the 
80287 is in normalizing mode. If in normalizing mode (D unmasked), the input is 
treated as a zero, and a Z error is issued. If not in normalizing mode (D masked), 
the input is treated as an unnormal, and an I error is issued. Note that even though 
the D masking bit is tested, the D error is never issued by mgerLGE, and the D trap 
handler is never called during mqerLGE. 


Whenever the trap handler is called, the number 16C hex is first placed into the 
80287 instruction selector. : 


Example of PL/M-286 Use 


mqgerLGE: PROCEDURE (X) REAL EXTERNAL; 
DECLARE X REAL; 
END mgerLGE; 


FSQRT287: PROCEDURE (X) REAL EXTERNAL; 
DECLARE X REAL; 
END FSQRT287; 


/* The above procedure is simply a PUBLIC ASM286 procedure 
which consists of the FSQRT instruction, followed by a 
RET instruction. */ 
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DECLARE X REAL; 
DECLARE THETA REAL; 


X = 3.0; /* Test va 


/* The following code 


sine of X. That is 
hyperbolic sine is 


THETA = mgerLGEC X + 


/* For the test input 


Example of ASM286 Use 


; This EXTRN must app 
. pairs: 
EXTRN mqgerLGE: FAR 
Xx DQ -3.0 
THETA DQ 2 
ONE DD 1.00 
; The following code 
; sine, just as in th 
; LONG_REAL inputs. 
FLD X 
FMUL ST,ST 
FADD ONE 
FSQRT 
FADD X 
CALL mgerLGE 
FSTP THETA 
; With the test input 


80287 Support Library 


lue */ 

calculates the inverse hyperbolic 
», THETA is set to the number whose 
Kea 

FSQRT287(X X + 1.9); 

» THETA now equals about 1.81845 *#/ 


ear outside of all SEGMENT-ENDS 


; initialized to a test value 


; constant used below 


calculates the inverse 
e PL/M example above, 


hyperbolic 
except with 


; input parameter onto 80287 stack 
; X squared 


; X squared + 1 


x SQRTCX squared + 1) 

take the natural logarithm -- 
is the answer 
store it and pop 


+ 


this 


. 
5 
i 
i 
H 


the 80287 stack 


THETA is now about -1.81845 
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MAX — maqerMAX xX = max(x,y) 


Input Parameters 


(x) is the top number on the 80287 stack; (y) is the next number on the 80287 stack. 


Function 


mgerMAX returns the greater of the numbers (x) and (y). That is, if the 80287 
FCOM instruction indicates that (x) > (y), then (x) is returned. If (x) < (y), then, 
(y) is returned. When (x) and (y) test as equal—even though they may be given in 
different formats (for example, +0 and —0),—(x) is returned. 


If the 80287 chip is in affine (signed infinity) mode, either or both inputs can be 
infinite. If the 80287 is in projective (unsigned infinity) mode, and if either input is 
infinite, both must be infinite. In that case, the values test as equal and (x) is the 
answer. 


Output 


The 80287 stack pops once, with the answer replacing the two inputs. 


Errors 


The first error detected is the D error, which is for unnormal or denormal inputs. If 
the 80287 is in warning mode (D is masked), the calculation continues, but the D 
error bit remains set. If the 80287 is in normalizing mode (D is unmasked), the D 
trap handler is called. The trap handler is called directly from the interior of 
mqerMAX; the 80287 opcode register contains the code for the FCOM instruction 
that caused the D error. The (y) and (x) inputs are left on the 80287 stack. Most 
trap handlers replace the denormal input(s) with normalized numbers, reexecute the 
FCOM or FSUB instruction, and continue through mqerMAX. The trap handler 


provided by EH287.LIB (described in Chapter 5) does these things and replaces 
denormals with zero. 


mqerMAX next checks for NaN inputs. If either input is a NaN, an I error is given. 
If I is masked, the answer returned is the input NaN (the larger NaN if both inputs 
are NaNs). 


An I error is also given if the 80287 chip is in projective (unsigned infinity) mode, 
and one of the inputs is infinite. In this case, a masked I yields the value [NDEFI- 
NITE for an answer. 


For all I errors when I is unmasked, the trap handler is called with the inputs still on 
the 80287 stack, and the 80287 instruction selector set to 265 hex. 


Example of PL/M-286 Use 


mqerMAX: PROCEDURE CY,X) REAL EXTERNAL; 
DECLARE (Y,X) REAL; 
END mqerMAX; 


DECLARE POPULATIONS(10) REAL; 


DECLARE LARGEST REAL; 
DECLARE N BYTE; 
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7/* The following code sets LARGEST to the greatest of the 
ten values in the array POPULATIONS. */ 


LARGEST = POPULATIONS(C0); 
DO N = 1 TO 9; 

LARGEST = mgerMAXCLARGEST,POPULATIONSCN)); 
END; 


Example of ASM286 Use 


; This EXTRN must appear outside of all SEGMENT-ENDS 
4 pairs: 
EXTRN mqerMAX: FAR 


VARI Da -5.3 

VAR2 Da -7.9 
; the above initializations are test 
; values 

LARGEST DQ 2 


; The following code sets LARGEST to the maximum of VAR1 
; and VAR2. 


FLD VAR1 ; load the first parameter onto 
; the 80287 stack 
FLD VAR2 ; load the second parameter 
CALL mqerMAX ; stack now contains the maximum 
FSTP LARGEST ; maximum is stored, and 80287 

oT 


stack is popped 


; With the test inputs, LARGEST is now -5.3 
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MIN — mqerMIN xX = min(x,y) 


Input Parameters 


(x) is the top number on the 80287 stack; (y) is the next number on the 80287 stack. 


Function 


mgerMIN returns the lesser of the numbers (x) and (y). That is, if the 80287 FCOM 
instruction indicates that (x) < (y), then (x) is returned. If (x) > (y), then (y) is 
returned. When (x) and (y) test as equal—even though they may be given in different 
formats (for example, +0 and —0)—(x) is returned. 


If the 80287 chip is in affine (signed infinity) mode, either or both inputs can be 
infinite. If the 80287 is in projective (unsigned infinity) mode, and if either input is 
infinite, both must be infinite. In that case, the values test as equal, and (x) is the 
answer. 


Output 


The 80287 stack pops once, with the answer replacing the two inputs. 


Errors 


The first error detected is the D error, which is for unnormal or denormal inputs. If 
the 80287 is in warning mode (D is masked), the calculation continues, but the D 
error bit remains set. If the 80287 is in normalizing mode (D is unmasked), the D 
trap handler is called. The trap handler is called directly from the interior of 
mqaerMIN; the 80287 instruction selector contains the code for the FCOM instruc- 
tion that caused the D error. The (y) and (x) inputs are left on the 80287 stack. Most 
trap handlers replace the denormal input(s) with normalized numbers, reexecute the 
FCOM or FSUB instruction, and continue through mqerMIN. The trap handler 
provided by EH287.LIB (described in Chapter 5) does these things and replaces 
denormals with zero. 


mqerMIN next checks for NaN inputs. If either input is a NaN, an I error is given. 
If I is masked, the answer returned is the input NaN (the larger NaN if both inputs 
are NaNs). 


An | error is also given if the 80287 chip is in projective (unsigned infinity) mode 
and exactly one of the inputs is infinite. In this case, a masked I yields the value 
INDEFINITE for an answer. 


For all J errors when I is unmasked, the trap handler is called with the inputs still on 
the 80287 stack and the 80287 instruction selector set to 265 hex. 


Example of PL/M-286 Use 


mgerMIN: PROCEDURE CY,X) REAL EXTERNAL; 
DECLARE CY,X) REAL; 
END mgerMIN; 


DECLARE POPULATIONS(10) REAL; 


DECLARE SMALLEST REAL; 
DECLARE N BYTE; 
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/* The 
ten 


code 
the 


following 
values in 


SMALLEST = 
DO N = 1 TO 9; 

SMALLEST = 
END; 


Example of ASM286 Use 


sets 
array POPULATIONS. */ 
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SMALLEST to the smallest of the 


POPULATIONS(0); 


mgerMINCSMALLEST,POPULATIONS(N)); 


3; This EXTRN must appear outside of all SEGMENT-ENDS 
} pairs: 
EXTRN mgerMIN: FAR 
VAR1 DQ -S.3 
VAR2 DQ -7.9 
the above initializations are test 
>; values 
SMALLEST DQ ? 
3 The following code sets SMALLEST to the minimum of VAR1 
; and VAR2. 
FLD VAR1 ; load the first parameter onto 
; the 80287 stack 
FLD VAR2 ; load the second parameter 
CALL mgerMIN 3 stack now contains the minimum 
FSTP SMALLEST 5; Minimum is stored, and 80287 
3 stack is popped 
; With the test inputs, SMALLEST is now -7.9 
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MOD _ mqerMOD xX = (y mod x), same sign as (y) 


Input Parameters 


(x) is the top number on the 80287 stack; (y) is the next number on the 80287 stack. 


Function 


mgerMOD returns the answer (y—(x mgerICX(y/x)). In other words, this is the 
“remainder” left when (y) is divided by (x). The answer is always exact; no roundoff 
error occurs. 


mqerMOD always returns the same values when (x) is negative as it does for the 
corresponding positive input (—x). (x) in the following paragraphs means the absolute 
value of (x). 


mgerMOD is calculated by subtracting an integer multiple of (x) from the input (y) 
to bring it down to within (x) units of zero. The choice of which integer multiple to 
subtract determines the range of possible values the function can yield. For mgerMOD, 
the integer is mgerICX(y/x), which is the value (y/x) chopped towards zero. If (y) 
is postive, the answer is greater than or equal to 0, and less than (x). If (y) is negative, 
the answer is greater than (—x) and less than or equal to 0. 


For example, suppose (x) equals either —5 or 5. Then, for negative y, mgqerMOD(y,5) 
gives values in the range between —5 and 0. mqerMOD(—7,5) is —2; 
mgerMOD(—10,5) is 0; mqerMOD(—19.99,5) is —4.99. For positive y, 
mgerMOD(y,5) gives values in the range between 0 and 5. mqerMOD(2,5) is 2; 
mgerMOD(45,5) is 0; mgerMOD(44.75,5) is 4.75. 


It is legal to have infinite (x) inputs. In that case, mqerMOD simply returns (y) if 
(y) is finite and normal. If (y) is unnormal, the normalized (y) is returned. If (y) is 
denormal, the result depends on the setting of the 80287’s normalization mode, as 
determined by the D error masking flag. If in normalizing mode (D unmasked), the 
result is 0 with no error. If in warning mode (D masked), the result is the unchanged 
denormal (y), also with no error. 


It is often legal to have unnormal and denormal (y) inputs. The cases with infinite 
(x) are discussed in the above paragraph. If (y) is unnormal, and if the normalization 


of (y) does not produce a denormal, then (y) is legal and the normalized input is 
used, 


Output 


The 80287 stack pops once, with the answer replacing the two inputs. 


Errors 

First, the inputs are checked to see if either is a NaN. If so, an I error is given. If I 
is masked, the input NaN is returned (if both inputs are NaNs, the larger NaN is 
returned). 


If (x) is unnormal, denormal, or any zero value, an I error is given. Also, if (y) is 
infinite, an I error is given. If I is masked, the value INDEFINITE is returned. 


If I is unmasked for any of the above errors, the trap handler is called, with the inputs 
still on the 80287 stack and the number 269 hex in the 80287 opcode register. 
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A U error is given when (y) is unnormal, and the normalization of (y) produces a 
denormal. A U error is also given if (y) is denormal. If U is masked, a 0 is returned. 
If U is unmasked, the trap handler is called with the value 169 hex placed in the 
80287 instruction selector—but the inputs are not on the 80287 stack. Instead, the 
correct answer is given, with a “wrapped” exponent. To obtain the correct exponent, 
subtract the decimal number 24576 from the given exponent. 


Example of PL/M-286 Use 


mgerMOD: PROCEDURE (CY,X) REAL EXTERNAL; 
DECLARE CY,X) REAL; 
END mqerMOD; 


DECLARE Y REAL; 
DECLARE LAST_THREE_DIGITS REAL; 


Y = 456789.00; /* Test value */ 


/* The following line sets LAST_THREE_DIGITS to Y maoD 
1000. If Y is a positive integer, then the answer is 
the number formed by the last three decimal digits of 
Yu 8d 


LAST_THREE_DIGITS = mqerMODCy,1000.); 


/* With the test value, LAST_THREE_DIGITS is now 789.00 */ 


Example of ASM286 Use 


3 This EXTRN must appear outside of all SEGMENT-ENDS 

} pairs: 

EXTRN mqerMOD: FAR 

LAST_THREE_DIGITS DQ ? 

Y Da 181137.00 ; initialization is a 
> test value 

ONE_GRAND DD 1000.00 ; constant for 


calculation below 


+ The following code calculates Y MOD 1000, as in the PL/M 
3 example above, except with LONG_REAL variables 


FLD Y 


i} load first parameter onto 80287 

; stack 
FLD ONE_GRAND + load modulus 1000 onto 80287 stack 
CALL mqerMOD 3 take the modulus 


FSTP LAST_THREE_DIGITS ; Store answer and pop the 
; 80287 stack 


i With the test value, LAST_THREE_DIGITS is 137.00 
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RMD — mqerRMD X = (y mod x), close to 0 


Input Parameters 


(x) is the top number on the 80287 stack; (y) is the next number on the 80287 stack. 


Function 


mgerRMD returns the answer (y—(x mqerlEX(y/x)). In other words, this is the 
“remainder” left when (y) is divided by (x). The answer is always exact; no roundoff 
error occurs. 


mgerRMD always returns the same values when (x) is negative as it does for the 
corresponding positive input (—x). (x) in the following paragraphs means the absolute 
value of (x). 


mgerRMD is calculated by subtracting an integer multiple of (x) from the input (y) 
to bring it down to within (x) units of zero. The choice of which integer multiple to 
subtract determines the range of possible values the function can yield. For mqgerRMD, 
the integer is mgerIEX(y/x), which is the value (y/x) rounded to the nearest integer. 
Thus, the range of answers is from (—x/2) to (x/2). 


For example, suppose (x) equals either —5 or 5. Then, the value of mgerRMD(y,5) 
ranges from —2.5 to 2.5. mqerRMD(—7,5) is —2; mqerRMD(—10,5) is 0; 
mgerRMD(-—19.99,5) is +0.01; mqerRMD(2,5) is 2; mgerRMD(4,5) is —1; 
mqerRMD(44.75,5) is —0.25. 


When the input (y) is an odd integer multiple of (x/2), the answer returned by 
mgerRMD can be either (x/2) or (—x/2). The number chosen is determined by the 
convention of mqerIEX, which rounds to the even integer in case of a tie. This results 
in values alternating between (—x/2) and (x/2). Inputs (y),which yield (x/2), form 
the series {... —7x/2, —3x/2, x/2, 5x/2, 9x/2,... }. Inputs (y), which yield (—x/ 
2), form the series {... —5x/2, —x/2, 3x/2, 7x/2, 11x/2, ... }. For example, 
mgerRMD(2.5,5) is 2.5; mqerRMD(7.5,5) is —2.5. 


It is legal to have infinite (x) inputs. In that case, mgerRMD simply returns (y) if 
(y) is finite and normal. If (y) is unnormal, the normalized (y) is returned. If (y) is 
denormal, the result depends on the setting of the 80287’s normalization mode, as 
determined by the D error masking flag. If in normalizing mode (D unmasked), the 
result is 0, with no error. If in warning mode (D masked), the result is the unchanged 
denormal (y), also with no error. 


It is often legal to have unnormal and denormal (y) inputs. The cases with infinite 


(x) are discussed in the above paragraph. If (y) is unnormal, and if the normalization 
of (y) does not produce a denormal, (y) is legal and the normalized input is used. 


Output 


The 80287 stack pops once, with the answer replacing the two inputs. 


Errors 


First, the inputs are checked to see if either is a NaN. If so, an I error is given. If I 
is masked, the input NaN is returned (if both inputs are NaNs, the larger NaN is 
returned). 
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If (x) is unnormal, denormal, or any zero value, an I error is given. Also, if (y) is 
infinite, an I error is given. If I is masked, the value INDEFINITE is returned. 


If | is unmasked for any of the above errors, the trap handler is called with the inputs 
still on the 80287 stack and the number 27A hex in the 80287 instruction selector. 


A U error is given when (y) is unnormal and the normalization of (y) produces a 
denormal. A U error is also given if (y) is already denormal. If U is masked, a 0 is 
returned. If U is unmasked, the trap handler is called with the value 17A hex placed 
in the 80287 instruction selector—but the inputs are not on the 80287 stack. Instead, 
the correct answer is given, with a “wrapped” exponent. To obtain the correct 
exponent, subtract the decimal number 24576 from the given exponent. 


Example of PL/M-286 Use 


mgerRMD: PROCEDURE CY,X) REAL EXTERNAL; 
DECLARE CY,X) REAL; 
END mgerRMD; 


DECLARE TWO_PI LITERALLY ‘6.283185307179586476925'; 
7* 2 * PI -- a full circle expressed in radians */ 


DECLARE THETA REAL; /* angle to be reduced */ 
THETA = 6.3 /* Test value */ 


/* The following line reduces THETA to a principal value 
-- a value between -PI and PI. */ 


THETA = mqgerRMDCTHETA, TWO_PI); 


7/* Now THETA is 6 radians, reduced to the principal value: 
about -0.2831853 */ 


Example of ASM286 Use 


; This EXTRN must appear outside of all SEGMENT-ENDS 
; pairs: 
EXTRN mgerRMD: FAR 


THETA DQ -6.00 ; initialization is a test value 


; The following code performs the same reduction of an 
; angle to a principal value as the PL/M code above, 
; except with a LONG_REAL variable. 


FLD THETA ; angle parameter onto 80287 stack 

FLOP! ; constant PI onto stack 

FADD ST,ST eee Pa 

CALL mqerRMD ; modulus is taken 

FSTP THETA ; principal value is stored, 80287 
; stack is popped 


; With the test value, THETA is now about 0.2831853 
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SGN — mqerSGN X = (y with x’s sign) 
Input Parameters 


(x) is the top number on the 80287 stack; (y) is the next number on the 80287 stack. 


Function 


If (x) is greater than or equal to zero, mqerSGN returns the absolute value of (y). If 
(x) is less than zero, mqerSGN returns the negative of the absolute value of (y). 


The positive absolute value of (y) is returned for all values of (x) that are zeroes or 
pseudo-zeroes, even if (x) is equivalent to —0. 


Unnormal values of (x) are legal. If (x) is not a pseudo-zero, only the sign of (x) is 
relevant to the final answer. 


Infinite values of (x) are allowed. The sign of the infinity determines the sign on the 
answer, even when the 80287 is in projective (unsigned infinity) mode. 


Any input (y) is legal, including NaNs, unnormals, denormals, and infinities. The 
only part of (y) that might be changed upon output is the sign. 


Output 


The.80287 stack pops once, with the answer replacing the two inputs. 


Errors 


If (x) is a denormal, the D error is given by an FTST instruction within mqerSGN. 
If the 80287 is in warning mode (D is masked), mqerSGN uses the denormal to 
determine the sign of the answer. If the 80287 is in normalizing mode (D is unmasked), 
the D trap handler will be called with the input still on the 80287 stack. Most trap 
handlers normalize the argument, reperform the FTST instruction, and continue with 
the computation of mqerSGN. The trap handler provided by EH287.LIB (described 
in Chapter 5) replaces the denormal with 0. Thus, the absolute value of (y) will be 
returned by mgerSGN. 


If (x) is a NaN, an I error results. If I is masked, (x) is returned. If I is unmasked, 
the trap handler is called with the inputs still on the 80287 stack and the 80287 
instruction selector set to 264 hex. 


Example of PL/M-286 Use 


mqgerSGN: PROCEDURE (Y,X) REAL EXTERNAL; 
DECLARE (Y,X) REAL; 
END mgerSGN; 


DECLARE THETA REAL; 

DECLARE Y_COOR REAL; 

DECLARE PI LITERALLY *3.14159265358979323'; 

Y_COOR = -0.0000001; 7* Test value */ 

/* The following code returns either the value PI or -PI. 


If Y_COOR is positive, it returns Pl. If Y_COOR is 
negative, it returns oP. Sh 
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THETA = mqerSGNC(PI,Y_COOR); 
7* With the test value, THETA now is -PI. *#/ 
Example of ASM286 Use 
; This EXTRN must appear outside of all SEGMENT-ENDS 
5 pairs: 
EXTRN mgerSGN: FAR 
THETA DQ ? 
Y_COOR DQ -0.001 ; initialized to a test value 
; The following code returns PI with the sign of Y_COOR, 
; just as in the PL/M example above. 
FLDPI ; first parameter PI onto 80287 stack 
FLD Y_COOR ; second parameter Y_COOR onto 80287 
; stack 
CALL mqerSGN ; combine sign of Y_COOR with magnitude 
+ oF PT 
FSTP THETA ; store answer and pop the 80287 stack 
; With the test case, THETA is now PI. 
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SIN — mqerSIN X = sine(x) 


Input Parameter 


(x) is the top number on the 80287 stack. 


Function 


mgerSIN returns the trigonometric sine of x, where x is an angle expressed in radians. 
All input zeroes, pseudo-zeroes, and denormals return the input value. Also, unnor- 
mals whose value is less than 2 return the input value. 


Output 


The answer replaces the input on the 80287 stack. 


Errors 


An J error is given for input infinities and NaNs. An J error is also given for unnor- 
mals that do not represent values less than 2°, 


If I is unmasked, the trap handler is called with the input still on the stack and the 
80287 instruction selector set to 171 hex. If I is masked, the answer is the input for 
NaNs; the answer is the value INDEFINITE for other invalid inputs. 


Example of PL/M-286 Use 


mqerSIN: PROCEDURE (THETA) REAL EXTERNAL; 
DECLARE THETA REAL; 
END mgerSIN; 


DECLARE CPOLAR_R, POLAR_THETA) REAL; 
DECLARE REC_Y REAL; 

DECLARE PI LITERALLY *3.14159265358979'; 
DECLARE DEG_TO_RAD LITERALLY ‘PI/180.°; 


POLAR_R = 2.; POLAR_THETA = 30.3 7* Test values #*/ 

/* The following line computes the Y-coordinate of a 
polar-to-rectangular conversion. The input angle is 
degrees, so it mest be converted to radians. */ 


REC_Y = POLAR_R * mgerSINCPOLAR_THETA * DEG_TO_RAD); 


/* Now in the test case, REC_LY = 1. #*#/ 


Example of ASM286 Use 


; This EXTRN must appear outside of all SEGMENT-ENDS 
$ pairs: 
EXTRN mqerSIN: FAR 


POLAR_THETA DQ@Q 30.0 
POLAR_R D@ 2.0 
the above initializations are test 
; values. 
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REC_Y DQ 
DEG_TO_RAD DT 


The following 


example above; 
LONG_REAL. 


FLD POLAR_THETA 
FLD DEG_TO_RAD 
FMUL 

CALL mqgerSIN 
FMUL POLAR_R 
FSTP REC_Y 


; With the test 


9 
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SFFOSEFA3S1294E9CB8AER ; the constant 


H lines 
; polar-to-rectangular 
‘ except 
3 


H 
H 
; 
H 
i 
j 


case, 


; PI/180. 


compute the Y-coordinate of a 
conversion, as in the PL/M 


the variables are 


angle onto 80287 stack 


converted to radians 


taken 
scaled to correct radius 


Y-coordinate stored and stack is 


is now 1. 
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SNH — mqerSNH x = hyperbolic sine(x) 


Input Parameter 


(x) is the top number on the 80287 stack. 


Function 

mgerSNH returns the hyperbolic sine of x, where x is an angle expressed in radians. 
All input zeroes, pseudo-zeroes, and denormals return the input value. Also, unnor- 
mals whose value is less than 2 return the input value. 


Infinite inputs are legal, and return the input value. 


Output 


The answer replaces the input on the 80287 stack. 


Errors 


An I error is given for input NaNs. An I error is also given for unnormals that do 
not represent values less than 2°. 


If I is unmasked, the trap handler is called with the input still on the stack. If I is 
masked, the answer is the input for NaNs; the answer is the value INDEFINITE for 
other invalid inputs. 

mqgerSNH gives an O overflow error if the input is greater than approximately 11355. 
When O is masked, the value +INFINITY is returned. Likewise, O is given for 
inputs less than about —11355, with -INFINITY returned for masked O. When O 
is unmasked, the trap handler is called with the input still on the 80287 stack. 


When either trap handler is called, mqerSNH first sets the 80287 instruction selector 
to 16E hex. 


Example of PL/M-286 Use 

mqerSNH: PROCEDURE (THETA) REAL EXTERNAL; 
DECLARE THETA REAL; 

END mgerSNH; 

DECLARE CINPUT_VALUE, OUTPUT_VALUE) REAL; 

INPUT_VALUE = 2.7; /* Test value */ 

OUTPUT_VALUE = mqerSNHCINPUT_VALUE) ; 


7/* Now with the test input, OUTPUT_VALUE is about 
14.812526 */ 


Example of ASM286 Use 


; This EXTRN must appear outside of all SEGMENT-ENDS 
; pairs: 
EXTRN mgerSNH: FAR 
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INPUT_VALUE Da -2,. 
QUTPUT_VALUE DQ ? 
3 The following code 


; assignment 
+ except 


FLD INPUT_VALUE 
CALL mqerSNH 
FSTP OQUTPUT_VALUE 


3; With the test 
s -14.812526 


input, 


duplicates the 
statement, 
with LONG_REAL variables. 


OQUTPUT_VALUE is 


load the 
stack 
take the 
store the 
80287 
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; initialization is a test 


; Value 


above PL/M 


parameter onto the 80287 
hyperbolic 
answer 


stack 


sine 
and pop the 


Now about 
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TAN — mqerTAN x = tangent(x) 


Input Parameter 


(x) is the top number on the 80287 stack. 


Function 


mgerTAN returns the trigonometric tangent of x, where x is an angle expressed in 
radians. All input zeroes, pseudo-zeroes, and denormals return the input value. Also, 
unnormals whose value is less than 2} return the input value. 


Output 


The answer replaces the input on the 80287 stack. 


Errors 


An [ error is given for input infinities and NaN’s. An I error is also given for unnor- 
mals that do not represent values less than 2, 


If I is unmasked, the trap handler is called with the input still on the stack and the 
80287 instruction selector set to 173 hex. If I is masked, the answer is the input for 
NaNs; the answer is the value INDEFINITE for other invalid inputs. 


A Z error is given when the input number is an exact odd multiple of the closest 
TEMP_REAL number to 7/2. When Z is masked, +INFINITY is returned. When 
Z is unmasked, the trap handler is called with the input still on the 80287 stack and 
the 80287 instruction selector set to 173 hex. 


Example of PL/M-286 Use 


mgqerTAN: PROCEDURE (THETA) REAL EXTERNAL; 
DECLARE THETA REAL; 
END mgerTAN; 


DECLARE PI LITERALLY *3.14159265358979'; 

DECLARE DEG_TO_RAD LITERALLY ‘*PI/180.7; 

DECLARE THETA_DEGREES REAL; 

DECLARE SLOPE REAL; 

THETA_DEGREES = 135.0; /* Test value */ 

/* The following line computes the tangent of the angle 
THETA_DEGREES. The answer is called SLOPE because it ts 
the slope of a line which is displaced by THETA_DEGREES 
from the X-axis, *#/ 


SLOPE = mgqerTANCTHETA_DEGREES * DEG_TO_RAD); 


7* Now with the test value, SLOPE = -1., */ 
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; This EXTRN must appear outside of all SEGMENT-ENDS 
; pairs: 
EXTRN mgerTAN: FAR 
THETA_DEGREES De 45.00 ; initialization is a test 
; value 
SLOPE Da? 
DEG_TO_RAD DT 3FFOSEFA351294E9CBAER ; the constant 
; PI/180. 
; The following code computes the tangent just as in 
; the PL/M example above, except with LONG_REAL 
; variables. 
FLD THETA_DEGREES ; load the first parameter onto 
; the 80287 stack 
FLD DEG_TO_RAD 
FMUL ; convert from degrees to radians 
CALL mgerTAN ; take the tangent of the radians 
; value 
FSTP SLOPE ; store the answer and pop the 
; 80287 stack 
; With the test input, SLOPE is now 1.00 
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TNH — mqerTNH x = hyperbolic tangent(x) 


Input Parameter 


(x) is the top number on the 80287 stack. 


Function 

mgerTNH returns the hyperbolic tangent of x, where x is an angle expressed in 
radians. All input zeroes, pseudo-zeroes, and denormals return the input value. Also, 
unnormals whose value is less than 2“ return the input value. 

Infinite inputs are allowed. Input +INFINITY results in +1; —INFINITY results 
in —1. The sign of the infinity is significant even if the 80287 is in projective (unsigned 
infinity) mode. 


Output 


The answer replaces the input on the 80287 stack. 


Errors 


An I error is given for input NaNs. An I error is also given for unnormals that do 
not represent values less than 2°, 


If I is unmasked, the trap handler is called with the input still on the stack and the 


80287 instruction selector set to 170 hex. If I is masked, the answer is the input for 
NaNs; the answer is the value INDEFINITE for illegal unnormals. 


Example of PL/M-286 Use 
mqerTNH: PROCEDURE (THETA) REAL EXTERNAL; 
DECLARE THETA REAL; 
END mgerTNH; 
DECLARE CINPUT_VALUE, OUTPUT_VALUE) REAL; 
INPUT_VALUE = 0.62; 7/* Test value */ 
QUTPUT_VALUE = mgerTNHCINPUT_VALUE); 
/* Now with the test input, OQUTPUT_VALUE is about 
0.55112803 */ 
Example of ASM286 Use 
3 This EXTRN must appear outside of all SEGMENT-ENDS 
5 pairs: 
EXTRN mqgerTNH: FAR 
INPUT_VALUE DQ -0.62 ; initialization is a test 


; value 
QUTPUT_VALUE DQ ? 
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; The code 
; assignment 


; variables. 


following 
FLD INPUT_VALUE 
CALL mqerTNH 

FSTP OQUTPUT_VALUE 


; With the test 
; -0.55112803 


input, 


duplicates 
statement, 


i 
H 
H 
H 
i 


QUTPUT_VALUE is 
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the above PL/M 
except with LONG_REAL 


load 
stack 
take 
store 
80287 


the parameter onto the 80287 
the hyperbolic 
the answer 


stack 


tangent 
and pop the 


now about 
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Y2Xx — mqaerY2X x = y* 


Input Parameters 


(x) is the top number on the 80287 stack; (y) is the next number on the 80287 stack. 


Function 


mgerY2X computes (y) to the (x) power; neither (y) nor (x) is required to be an 
integer. For most inputs, the formula used is 2°t620», 


The base (y) must be positive for the logarithmic formula to have any meaning. In 
some cases, however, (y) is allowed to be nonpositive. 


¢ If (x) is positive, a zero (y) gives a zero answer, with no error. 
¢ If (x) is zero, (y) can be negative; the answer is 1. 


¢ If (x) is an integer, (y) can be negative. The function is evaluated using the 
absolute value of (y). The result is the answer if (x) is even; it is the negative of 
the answer if (x) is odd. 


Zero, infinite, unnormal, or denormal inputs are accepted under certain conditions. 


When either input is denormal, it is replaced with an alternate value. The value 
selected depends on the setting of the 80287 D masking bit. If the 80287 is in normal- 
izing mode (D is unmasked), the input is replaced by 0. If the 80287 is in warning 
mode (D is masked), the input is replaced by the equivalent unnormal. Note that 
even though mqerY2X references the D masking bit, it never gives a D error, and it 
never calls the D trap handler. 


An unnormal (y) input is legal only if (x) is a normal integer or infinite value. If (x) 
is infinite, the function is evaluated as if (y) were the equivalent normal value. If (x) 
is zero, (y) must be nonzero; in that case, the answer is |. If (x) is any other integer, 
it must fit into 32 bits; in that case, the function mqerYI4 is called to obtain the 
answer. 


An unnormal (x) input is legal only if it is nonzero and (y) is infinite or zero. In those 
cases, (x) is replaced by its normal equivalent. 


When the 80287 is in affine (signed infinity) mode, mqerY2X allows infinite inputs 

in a number of cases: 

¢ If (y) is ~INFINITY, (x) must be a nonzero integer. The magnitude of the 
answer is then INFINITY if (x) is positive; zero if (x) is negative. The sign of 
the answer is positive if (x) is even; negative if (x) is odd. 

¢ If (y) is +INFINITY, any nonzero (x) is legal. The answer is +INFINITY if 
(x) is positive; zero if (x) is negative. 

¢  If(x) is +INFINITY, (y) must be positive or any zero, and not equal to |. The 
answer is zero if (y) is less than 1, and +INFINITY if (y) is greater than I. 

* If (x) is ~INFINITY, (y) must likewise be positive or any zero, and not equal 
to 1. The answer is +INFINITY if (y) is less than 1, and —INFINITY if (y) 
is greater than I. 


When the 80287 chip is in projective (unsigned infinity) mode, only one case exists 


in which any infinite input is allowed: when (y) is infinite, and (x) is a nonzero integer. 
The result is the same as if the 80287 were in affine mode. 
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Output 


The 80287 stack pops once, with the answer replacing the two inputs. 


Errors 


mqerY2X first checks for NaN inputs. If either input is a NaN, an | error is given. 
If I is masked, the input NaN is returned (the larger NaN is returned if both inputs 
are NaNs). 


The legal cases involving unnormal inputs, infinite inputs, and negative (y) inputs are 
described above. Illegal cases yield an I error. If I is masked, the value INDEFI- 
NITE is returned. The case (y = 1) and (x infinite), among others, falls into this 
category. 


It is illegal for both (x) and (y) to have zero values. This too gives an I error, with 
an INDEFINITE answer if I is masked. 


If (y) is any zero and (x) is any negative value (including negative infinity), a Z error 
is given. If Z is masked, the value +INFINITY is returned. 


The O overflow or U underflow error occurs when (y*) cannot be represented by the 
TEMP_REAL exponent. If O is masked, an overflow will return the answer 
+INFINITY. In underflow cases, if U is masked, the correct answer is given if it 
can be represented by a denormal; otherwise, 0 is given. 


All of the errors (I, Z, O, and U) cause the trap handler to be called when the corre- 
sponding exception bit is unmasked. mqerY2X leaves the input numbers on the 80287 
stack and places the value 26A hex into the 80287 instruction selector before calling 
the trap handler. 


Example of PL/M-286 Use 

mqerY2X: PROCEDURE (Y,X) REAL EXTERNAL; 
DECLARE C(Y,X) REAL; 

END mgerY2Xx; 


DECLARE CUBE_ROOT REAL; 
DECLARE INPUT_VALUE REAL; 


INPUT_VALUE = 17.00; /* Test value */ 


/* The following line takes the cube root of the positive 


value INPUT_VALUE. */ 
CUBE_ROOT = mgerY2XCINPUT_VALUE, 1./3.); 


/* With the test input, INPUT_VALUE is now about 
2.5712816 #*#/ 


Example of ASM286 Use 


; This EXTRN must appear outside of all SEGMENT-ENDS 
$ pairs: 
EXTRN mgerY2X: FAR 


INPUT_VALUE DQ 64.00 ; initialization is a test 
; value 
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CUBE_ROOT DQ 
OQNE_THIRD DT 


; The following lines 
; PL/M example above, 


FLD INPUT_VALUE 
FLD ONE_THIRD 


CALL mqerYe2x 
FSTP CUBE_ROOT 


; With the test input, 
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0.333333333333333333333 ; constant 


; used below 


the cube root just as in the 
except with LONG_REAL variables. 


load first parameter onto 
80287 stack 

load second parameter onto 
80287 stack 

exponentiate 

store the answer and pop the 
80287 stack 


CUBE_ROOT is now about 4.00 
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yi2 — mgqerYI2 x =x" AX 


Input Parameters 


(x) is the top number on the 80287 stack. The power to which (x) is raised is the 
80286 AX register, interpreted as a twos’ complement signed integer. 


Function 


mqgerYI2 raises the real input (x) to an integer power. If the integer is zero, the 
answer is 1. In this case no error is given, even if (x) isa NaN. 


If AX is not zero, the input (x) is first checked for unusual values. 


If (x) is +INFINITY, the answer is +INFINITY for positive AX; +0 for negative 
AX. No error exists. 


If (x) is -INFINITY, the magnitude of the answer is INFINITY for positive AX; 
0 for negative AX. The sign of the answer is positive for even AX; negative for odd 
AX. 


Zero (x) input is legal if AX is positive. The answer is —O if (x) is —O and AX is 
odd; the answer is +0 in all other cases. 


If (x) is denormal, no error is given. However, the 80287 D error masking bit is 
checked to see what action to take. If the 80287 is in normalizing mode (D is 
unmasked), (x) is replaced by zero. If the 80287 is in warning mode (D is masked), 
(x) is replaced by the unnormal number that has the same numeric value as the 
denormal. The evaluation of mqerYI2 proceeds with the new (x). 


If (x) is unnormal and AX is negative, (1/x) is computed, preserving the number of 
unnormalization bits. Then, the positive power is computed by successively squaring 
and multiplying by (x). 


If (x) is unnormal and AX is positive, the power is computed by successively squaring 
and multiplying by (x). 


For normal, nonzero values of (x), computation of the power proceeds according to 
the value of the integer power AX. 


If the integer power is 64 or greater, or —64 or less, the answer is computed with 
logarithms. The answer is 2 ** (AX * LG2(x)). 


If the integer power is from | to 63, the answer is computed by successively squaring 
and multiplying by (x) to achieve the correct power. 


If the integer power is from —63 to —1, mgerY12 determines if any exceptions would 
occur if the expression 1 / (x * x * ... x) were evaluated. If not, the expression is 
evaluated and the answer is returned. If so, the expression (1/x) * (1/x) * ... * (1/x) 
is evaluated. If the second expression causes exceptions, the trap handler is called. 


The maximum number of multiplications performed for any of the above squaring- 
and-multiplying algorithms is 9. 


Output 


The answer replaces the input (x) on the 80287 stack. The AX input is destroyed, as 
allowed by PL/M-286 procedure conventions. 
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As stated above, no errors can exist if AX is 0. Otherwise, errors occur in the follow- 


ing cases: 


¢ If (x) isa NaN, an I error is given. If I is masked, the input NaN is returned as 


the answer. 


¢ AU underflow error occurs when the computed answer is too close to zero to be 
represented by the exponent. If U is masked, the answer is replaced by the equiv- 
alent denormal if it exists; 0 otherwise. 


¢ An O overflow error occurs when the magnitude of the answer is too great to be 
represented by the exponent. If O is masked, the answer is INFINITY, with the 


appropriate sign. 


¢ If any of the errors (I, O, or U) occurs with the error unmasked, the trap handler 
is called. Before calling the trap handler, mgerYI2 sets the 80287 instruction 
selector to 27C hex and leaves the inputs on the 80287 stack. The integer power 
is converted to TEMP_REAL and pushed onto the top of the 80287 stack. The 
base (the original (x)) becomes the second stack element. 


Example of PL/M-286 Use 


For PL/M-286, the 16-bit input parameter should be on the 80286 stack rather than 
in the AX register. Therefore, use mqerYIS (instead of mqerYI2) in PL/M-286 


programs. 


Example of ASM286 Use 


; This EXTRN must appear 
} pairs: 
EXTRN mqgerYI2: FAR 
POWER DW 9 
REAL_BASE Da 1 

; the 


outside of all SEGMENT-ENDS 


5 exponent which will be used 
+; number which will be raised to 
; POWER 

above initializations are test 


; values 


REAL_OUTPUT Da ? 


; The 
; together, 


following 
and 


stores 
FLD REAL_BASE 
MOV AX,POWER 
CALL mqerYl2 


FSTP REAL_OUTPUT 


; With the test 


inputs, 


code multiplies 
the 


POWER copies of REAL_BASE 


answer in REAL_OUTPUT. 

base parameter goes onto the 80287 
stack 

exponent goes into the AX 

register 

REAL_BASE ** POWER is now on 80287 
stack 

store the answer and pop the 80287 
stack 
REAL_OUTPUT is now about 10.604499 
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Y14 — maeryi4 x = x" DXAX 


Input Parameters 


(x) is the top number on the 80287 stack. The power to which (x) is raised is a 32- 
bit two's complement value in the 80286 DX and AX registers. DX is the most signif- 
icant half, and AX is the least significant half. 


Function 


maerY12 raises the real input (x) to an integer power. The input integer is presented 
in a 32-bit format. Note, however, that 32 bits are rarely necessary to represent an 
integer exponent. Raising a number to a power greater than 32768 rarely gives 
meaningful results. Thus mgerY12 is sufficient for almost every application in which 
mgerYI4 might be used. mgerYI4 is provided mainly for compatibility with the 
32-bit integer types found in Pascal-286 and FORTRAN-286. 


If the input integer power is zero, the answer is | no matter what the value of (x). In 
this case no error is given, even if (x) isa NaN. 


If DXAX is not zero, the input (x) is first checked for unusual values. 


If (x) is +INFINITY, the answer is +INFINITY for positive DXAX; +0 for 
negative DXAX. No error occurs. 


If (x) is INFINITY, the magnitude of the answer is INFINITY for positive DXAX; 
0 for negative DXAX. The sign of the answer is positive for even DXAX; negative 
for odd DXAX. 


Zero (x) input is legal if DXAX is positive. The answer is —O if (x) is —O and 
DXAX is odd; the answer is +0 in all other cases. 


If (x) is denormal, no error is given. However, the 80287 D error masking bit is 
checked to see what action to take. If the 80287 is in normalizing mode (D is 
unmasked), (x) is replaced by zero. If the 80287 is in warning mode (D is masked), 
(x) is replaced by the unnormal number that has the same numeric value as the 
denormal. The evaluation of mqerYI2 proceeds with the new (x). 


If (x) is unnormal and DXAX is negative, (1/x) is computed, preserving the number 
of unnormalization bits. Then, the positive power is computed by successively squar- 
ing and multiplying by (x). 


If (x) is unnormal and DXAX is positive, the power is computed by successively 
squaring and multiplying by (x). 


For normal, nonzero values of (x), computation of the power proceeds according to 
the value of the integer power DXAX. 


If the integer power is 64 or greater, or —64 or less, the answer is computed with 
logarithms. The answer is 2 ** (DXAX * LG2(x)). 


If the integer power is from | to 63, the answer is computed by successively squaring 
and multiplying by (x) to achieve the correct power. 


If the integer power is from —63 to —1, mgerYI4 determines if any exceptions would 
occur if the expression | / (x * x * ... x) were evaluated. If not, the expression is 
evaluated and the answer is returned. If so, the expression (1/x) * (1/x) * ... * (1/x) 
is evaluated. If the second expression causes exceptions, the trap handler is called. 
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The maximum number of multiplications performed for any of the above squaring- 
and-multiplying algorithms is 9. 


Output 


The answer replaces the input (x) on the 80287 stack. The DXAX input is destroyed, 
as allowed by PL/M-286 procedure conventions. 


Errors 


As stated above, no errors can occur if DXAX is 0. Otherwise, errors occur in the 
following cases: 


¢ If (x) isa NaN, an I error is given. If I is masked, the input NaN is returned as 
the answer. 


¢ AU underflow error occurs when the computed answer is too close to zero to be 
represented by the exponent. If U is masked, the answer is replaced by the equiv- 
alent denormal if it exists; 0 otherwise. 


+ A O overflow error occurs when the magnitude of the answer is too great to be 
represented by the exponent. If O is masked, the answer is INFINITY with the 
appropriate sign. 

¢ — If any of the errors (I, O, or U) occur with the error unmasked, the trap handler 
is called. Before calling the trap handler, mqerYI2 sets the 80287 instruction 
selector to 27C hex and leaves the inputs on the 80287 stack. The integer power 
is converted to TEMP_REAL and pushed onto the top of the 80287 stack. The 
base (the original (x)) becomes the second stack element. 


Example of PL/M-286 Use 


Since PL/M-286 supports no 32-bit integer data type, mqerYI4 cannot be used by 
PL/M programs. You should use either mqerYIS or mgerY 2X. 


Example of ASM286 Use 


+ This EXTRN must appear outside of all SEGMENT-ENDS 
} pairs: 
EXTRN mgerYI4: FAR 


POWER DD 9 ; exponent which will be used 
REAL_BASE DQ 1.3 ; Number which will be raised to 
; POWER 

; the above initializations are 
; test values 
REAL_OUTPUT DQ ? 


; The following code multiplies POWER copies of REAL_BASE 
3 together, and stores the answer in REAL_OUTPUT. 


FLD REAL_BASE ; base parameter goes onto 
the 80287 stack 

low 16 bits of exponent 
to AX 

---high 16 bits to DX 
REAL_BASE ** PQWER is 
now on 80287 stack 

store the answer and pop 
the 80287 stack 


MOV AX, WORD PTR POWER 


MOV DX, WORD PTR CPOWER+2) 
CALL mgerYI4 


FSTP REAL_OQUTPUT 


; With the test inputs, REAL_OUTPUT is now about 10.604499 
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YIS — mgqerYIS x =x" STK 


Input Parameters 


(x) is the top number on the 80287 stack. The power STK to which (x) is to be raised 
is a 16-bit two’s complement integer that is pushed onto the stack before mgerYIS is 
called. 


Function 


mgerYIS raises the real input (x) to an integer power. If the integer is zero, the 
answer is |. In this case no error is given, even if (x) isa NaN. 


If STK is not zero, the input (x) is first checked for unusual values. 


If (x) is +INFINITY, the answer is +INFINITY for positive STK; +0 for negative 
STK. No error occurs. 


If (x) is ~INFINITY, the magnitude of the answer is INFINITY for positive STK; 
0 for negative STK. The sign of the answer is positive for even STK; negative for odd 
STK. 


Zero (x) input is legal if STK is positive. The answer is —0 if (x) is —O and STK is 
odd; the answer is +0 in all other cases. 


If (x) is denormal, no error is given. However, the 80287 D error masking bit is 
checked to see what action to take. If the 80287 is in normalizing mode (D is 
unmasked), (x) is replaced by zero. If the 80287 is in warning mode (D is masked), 
(x) is replaced by the unnormal number that has the same numeric value as the 
denormal. The evaluation of mgerYIS proceeds with the new (x). 


If (x) is unnormal and STK is negative, (1/x) is computed, preserving the number of 
unnormalization bits. Then, the positive power is computed by successively squaring 
and multiplying by (x). 


If (x) is unnormal and STK is positive, then the power is computed by successively 
squaring and multiplying by (x). 


For normal, nonzero values of (x), power computation proceeds according to the value 
of the integer power STK. 


If the integer power is 64 or greater, or —64 or less, the answer is computed with 
logarithms. The answer is 2 ** (STK * LG2(x)). 


If the integer power is from | to 63, the answer is computed by successively squaring 
and multiplying by (x) to achieve the correct power. 


If the integer power is from —63 to —1, mqerYIS determines if any exceptions would 
occur if the expression | / (x * x * ... x) were evaluated. If not, the expression is 
evaluated and the answer is returned. If so, expression (1/x) * (1/x) * ... * (1/x) is 
evaluated. If the second expression causes exceptions, the trap handler is called. 


The maximum number of multiplications performed for any of the above squaring- 
and-multiplying algorithms is 9. 
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Output 


The answer replaces the input (x) on the 80287 stack. mqerYIS returns with the 
value STK popped off the 80286 stack, so it no longer exists. 


Errors 


As stated above, no errors can occur if STK is 0. Otherwise, errors occur in the 
following cases: 


*  If(x) isa NaN, an I error is given. If I is masked, the input NaN is returned as 
the answer. 


e AU underflow error occurs when the computed answer is too close to zero to be 
represented by the exponent. If U is masked, the answer is replaced by the equiv- 
alent denormal if it exists; the answer is 0 otherwise. 


* An O overflow error occurs when the magnitude of the answer is loo great to be 
represented by the exponent. If O is masked, the answer is INFINITY, with the 
appropriate sign. 

¢ If any of the errors (I, O, or U) occurs with the error unmasked, the trap handler 
is called. Before calling the trap handler, mqerYIS sets the 80287 instruction 
selector to 27C hex and leaves the inputs on the 80287 stack. The integer power 
is converted to TEMP_REAL and pushed onto the top of the 80287 stack. The 
base (the original (x)) becomes the second stack element. 


Example of PL/M-286 Use 


mgerYIS: PROCEDURE (Y,1) REAL EXTERNAL; 
DECLARE Y REAL, I INTEGER; 
END mgerYIS; 


DECLARE INTEREST_RATE REAL; 
DECLARE NUMBER_OF_PERIOQDS INTEGER; 
DECLARE START_AMOUNT REAL; 

DECLARE FINISH_AMOUNT REAL; 


INTEREST_RATE = 0.015; 7* Test value */ 
NUMBER_OF_PERIODS = 12; 7* Test value */ 
START_AMOUNT = 1000.00; 7* Test value */ 


/* The following line calculates compound interest for the 
given NUMBER_OF_PERIODS, given the rate INTEREST_RATE 
for each period. INTEREST_RATE is presented as a 
fraction of 1; for example, the value 0.015 represents 
1.5 percent interest for each time period. */ 


FINISH_AMOUNT = START_AMOUNT*® mqgerYIS 
C1.+INTEREST_RATE, NUMBER_OF_PERIODS); 


/* With the test inputs, FINISH_AMOUNT is now about 
1195.62. This is the balance of an unpaid loan of 
$1000.00 after one year, if the loan accumulates 1.5 
percent interest every month. */ 


Example of ASM286 Use 


; This EXTRN must appear outside of all SEGMENT-ENDS 
3} pairs: 
EXTRN mqerYIS: FAR 
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INTEREST_RATE Da 0.015 

NUMBER_OF_PERIOQDS DW 12 

START_AMOUNT DQ 1000.00 
3 the above initializations are test 
; values 

FINISH_AMOUNT Dae ? 


; The following code implements the above PL/M example in 
; assembly language, with LONG_REAL variables. 


1 onto 80287 stack 
C1 + 1) is on stack 
exponent parameter goes onto 


FLD1 H 
H 
3 
3 80286 stack 
? 
7 


FADD INTEREST_RATE 
PUSH NUMBER_OF_PERIODS 


CALL mgerYIS 
FMUL START_AMOUNT 


Ci + 1) ** N ts on 80287 stack 
scaled up by the amount of 
money 
store result and pop the 80287 
; stack 
; NOTE: Do not explicitly POP the NUMBER_OF_PERIODS from 
; the 80286 stack -- mqerYIS does that for you. 


FSTP FINISH_AMOUNT 


Binding CEL287.LIB to Program Modules 


The final action to take to use CEL287.LIB in your programs is to include the file 
name CEL287.LIB into the appropriate BND286 command. You must also bind in 
80287.LIB. 


If you are also using EH287.LIB, you must give the name EH287.LIB after 
CEL287.LIB. If you put EH287.LIB before CEL287.LIB, the program will link with 
no error messages, but it will halt after the first CEL287 function is called. 


Following is the suggested order for object modules in your BND286 statement: 


Your object modules 
DC287.LIB (if you are using it) 
CEL287.LIB 

EH287.LIB (if you are using it) 
80287.LIB 


For example, if you are binding your PL/M-286 modules MYMODI.OBJ and 
MYMOD2.0BJ into a program using the error handler, issue the following command: 


If you have a single ASM286-generated object module :F1:MYMODI.OBJ to be 
executed, issue the following command: 
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CHAPTER 5 


THE ERROR HANDLER MODULE 


Overview 


This chapter describes EH287.L1B, a library of five utility procedures that you can 
use to write trap handlers. Trap handlers are procedures that are called when an 
unmasked 80287 error occurs. 


EH287.LIB also contains a set of “dummy” public symbols for all the CEL287.LIB 
functions. These symbols save you code when you do not use all the CEL287.LIB 
functions. Their presence, however, makes it absolutely necessary that you link 
EH287.LIB and CEL287.LIB in the correct order. The last section of this chapter 
tells you how to do so. 


EH287.LIB also contains a set of alternate public names for its procedures, which 
are used by some Intel translators. They are listed in Appendix F. 


The 80287 error reporting mechanism can be used not only to report error conditions, 
but also to let software implement modes and functions not directly supported by the 
chip. This chapter defines three such extensions to the 80287: normalizing mode, 
nontrapping NaNs, and nonordered comparison. The utility procedures support these 
extra features. 


DECODE is called near the beginning of the trap handler. It preserves the complete 
state of the 80287 and also identifies what function called the trap handler, with what 
arguments and/or results. DECODE eliminates much of the effort needed to deter- 
mine what error caused the trap handler to be called. 


NORMAL provides the “normalizing mode” capability for handling the D exception 
(described in the following section). By calling NORMAL in your trap handler, you 
eliminate the need to write code that tests for nonnormal inputs. 


SIEVE provides two capabilities for handling the I exception. It implements nontrap- 
ping NaNs and nonordered comparisons (both described in the following sections). 
These two IEEE standard features reduce the incidence of multiple error reports for 
a single bad input. 


ENCODE is called near the end of the trap handler. It restores the state of the 80287 
saved by DECODE and performs a choice of concluding actions either by retrying 
the offending function or returning a specified result. DC287 exceptions cannot be 
retried. ENCODE provides a common path for exiting the trap handler and resuming 
execution of the user program. 


FILTER calls each of the above four procedures. If your error handler does nothing 
more than detect fatal errors and implement the features supported by SIEVE and 
NORMAL, your interface to EH287.LIB can be accomplished with a single call to 
FILTER. 


Normalizing Mode 


Normalizing mode allows you to perform floating-point operations without having to 
worry about whether the operands are in normal form. All denormal inputs will be 
normalized before the operation, without any user intervention. 


The 80287 provides the D error, which warns you that an operand is not normal. You 
can implement normalizing mode in software by unmasking the D error and 
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providing a D trap handler. The handler should perform the needed normalization 
and then retry the operation. NORMAL, provided in the 80287 support library, gives 
normalizations adequate for a majority of applications. 


Nontrapping NaNs 


The large number of representations for NaNs gives you the chance to put diagnostic 
information into a NaN. The information can be passed along as the NaN undergoes 
multiple floating-point operations. The information can not only tell where the NaN 
came from, but can also control further error action. 


EH287.LIB adopts the convention that the top bit of the fractional part of a NaN is 
a control bit used as follows: if the bit is 1, the NaN is considered a nontrapping 
NaN, for which no further error need be explicitly reported. You can return a 
nontrapping NaN as the result of an invalid operation. Then, when the NaN passes 
through more arithmetic, no more errors will be reported. You thus avoid multiple 
error messages which really come from only one error. 


The 80287 does not distinguish between trapping and nontrapping NaNs. All NaNs 
generate an | error when they are used. However, you can provide an | trap handler, 
which distinguishes between trapping and nontrapping NaNs. The procedure SIEVE 
does this for you. 


Nonordered Comparisons 


When testing two floating-point numbers for equality, you may or may not want an 
error to be reported if those numbers are NaNs. The 80287 provides the FCOM and 
FTST instructions, which report an I error if they are given a NaN input. 


To suppress error reporting for NaNs in FCOM and FTST, the following convention 
is recommended: if either FCOM or FTST is followed by a MOV AX,AX instruction 
(8BCO hex), the I trap handler should treat nontrapping NaNs as legal inputs. It 
should return the answer NONORDERED (C3 = CO = 1), even if the two inputs 
are the same NaN, and act as if no I error had occurred. The procedure SIEVE 
follows this suggested convention. 


Note that comparisons coded in PL/M-286 generate FCOM and FTST instructions, 
which are not followed by a MOV AX,AX instruction. Therefore, according to the 
EH287.LIB convention, PL/M-286 comparisons of nontrapping NaNs are not 
considered legal. No way exists to cause PL/M-286 to insert a MOV AX,AX 
instruction after a comparison. 


The ESTATE287 Data Structure 


ESTATE287 is a 144-byte data structure created by DECODE and used by the other 
EH287.L1B utility procedures. It contains most of the information your trap handler 
needs to provide customized error recovery: the state of the 80287, the identity of the 
offending operation, the values and formats of the operands, and possible already- 
calculated results. 


You will typically receive an ESTATE287 structure from DECODE and pass it back 
to ENCODE mostly unchanged. You need not become familiar with those parts of 
ESTATE287 that you do not change. 


Following is a description of each of the fields of the ESTATE287 structure. The 


offsets mentioned are decimal numbers that give the number of bytes from the begin- 
ning of ESTATE287 to the beginning of the field. 
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OPERATION is a WORD, offset 0, that contains an error code identifies which 
procedure or 80287 instruction caused the error. Appendix D gives the error codes 
for 80287 instructions. The error codes for CEL287 functions are the last two digits 
of the codes in Appendix E. The error code for all DC287 functions is OC8 hex. 


ARGUMENT is a BYTE, offset 2, that identifies the types and locations of the 
arguments of the interrupted operation. See figure 5-1 for the layout of the bit fields 
within the ARGUMENT byte. The 3-bit fields ATYPEI and ATYPE2 indicate the 
types of ARGI and ARG2, according to the following codes: 


0 no operand 

1 top of 80287 stack: ST(0) 

2 next element on 80287 stack: ST(1) 

3 the element of the 80287 stack specified by REGISTER 
4 anumber in 80286 memory of a type given by FORMAT 
5 a TEMP_REAL operand 

6 a 64-bit integer operand 

7 a binary-coded decimal operand 


The PUSH ONCE bit is | if the result is pushed onto the 80287 stack (rather than 
replacing one or two of the input arguments). 


For example, ARGUMENT would equal 21 hex if the instruction FPREM caused 
the error, because the arguments to FPREM are the top two elements on the 80287 
stack, and the result replaces the inputs rather than causing the 80287 stack to be 
pushed. 


ARGI(5) is a WORD array, offset 3, that gives the first argument of the operation 
in the format specified by ARGUMENT. 


ARGI_FULL is a Boolean BYTE, offset 13, the bottom bit of which is | if ARGI 
is present. If the error handler is called after the offending operation is done, the 
argument may no longer exist. 


ARG2(5) isa WORD array, offset 14, that gives the second argument of the opera- 
tion in the format specified by ARGUMENT. 


ARG2_FULL is a Boolean BYTE, offset 24, the bottom bit of which is | if ARG2 
is present. If only one argument exists, or if the error handler is called after the 
offending operation is done, this argument may not exist. 


RESULT is a BYTE, offset 25, that identifies the types and locations of the results 
of the interrupted operation. See figure 5-2. The 3-bit fields RTYPE! and RTYPE2 
use the same codes as the corresponding fields in the ARGUMENT byte. The POP 
ONCE bit is set if the operation causes the 80287 stack to pop exactly once; the POP 
TWICE bit is set if the operation causes the 80287 stack to pop twice (i.e., the opera- 
tion is FCOMPP.) 


7 0 


NOT PUSH 


Figure 5-1. Bit Fields of the ARGUMENT Byte in ESTATE287 1217252 


0 


7 
Po OP 
rwice meas once 


Figure 5-2. Bit Fields of the RESULT Byte in ESTATE287 121725-3 
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RES1(5) is a WORD array, offset 26, that gives the first result of the operation in 
the format specified by RESULT. 


RESI_FULL is a Boolean BYTE, offset 36, the bottom bit of which is 1 if RES1 is 
present. If the error handler is called before the offending operation is done, the result 
does not yet exist. 


RES2(5) is a WORD array, offset 37, that gives the second result of the operation 
in the format specified by RESULT. 


RES2_FULL is a Boolean BYTE, offset 47, bottom bit of which is | if RES2 is 
present. If only one result exists, or if the error handler is called before the offending 
operation is done, this result does not exist. 


FORMAT is a BYTE, offset 48, that specifies the memory data type when a field of 
ARGUMENT or RESULT has value 4. (Only one such field ever exists.) The possi- 
ble values of FORMAT are as follows: 


0 for SHORT_REAL (32 bits) 
1 for a 32-bit integer 

2 for LONG_REAL (64 bits) 
3 for a 16-bit integer 


REGISTER is a BYTE, offset 49, that specifies the 80287 stack element number 
when a field of ARGUMENT or RESULT has the value 3. (No more than one such 
field can have this value.) The values of REGISTER range from 0 for the top stack 
element to 7 from the bottom-most stack element. 


SAVE287(47) is a WORD array, offset 50, that contains the state of the 80287 as 
defined by the 80287 FSAVE instruction. Because DECODE is called after the 80287 
exceptions have been cleared, the 80287 status word stored into SAVE87 differs from 
the status word as it existed when the trap handler was invoked. This former value 
must be maintained separately from ESTATE287; it appears as the parameter 
ERRORS287 in all the EH287.LIB routines. 


Writing an 80287 Exception Handler in ASM286 Using 
EH287.LIB 


By using EH287.LIB, you eliminate the difficult aspects of interfacing to the 80287 
for your error recovery. However, a strict protocol must be followed. Following is a 
template of coding structure for an 80287 error handler written in ASM286. If your 
customized error recovery is limited to errors that do not examine the ESTATE287 
structure, follow the simpler template given under FILTER. 


1. The handler procedure must be an INTERRUPT procedure. To do this you must 
use the system builder, BLD286. 


2. If you expect to return to the code that caused the handler to be called, you must 
preserve all 80286 registers. The 80286 flags are automatically saved and restored, 
because this is an interrupt routine. 


3. The first floating-point instruction of the handler should be an FNSTSW 
instruction, which stores the 80287 status word into a 16-bit memory location. 
This status word is the ERRORS287 parameter given to the EH287.LIB 
procedures. 

4. To ensure synchronization with the 80287 at this point, you must provide an 
arbitrary access to the 80286 memory space. A PUSH AX instruction followed 
by a POP AX instruction is recommended. 
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5. An FNCLEX instruction should follow to clear the 80287 exceptions. The excep- 
tions must be cleared for the following EH287.LIB calls to work properly. 


6. The parameters to DECODE should be pushed onto the 80286 stack, and 
DECODE should be called. 


7. If you intend to use NORMAL and SIEVE, their calls should come immediately 
after the call to DECODE. You should not have intervening code that alters 
ESTATE287. NORMAL and SIEVE require ESTATE287 to be defined by 
DECODE. If ESTATE287 has no values that could be output by DECODE, the 
results of NORMAL and SIEVE are undefined. 


8. If you have any customized code in your error handler, it should appear here. 


9. If the handler is returning to the calling environment, the parameters to ENCODE 
should be pushed onto the 80286 stack, and ENCODE should be called. 


10. The 80286 registers saved at the beginning of the exception handler should now 
be restored. 


11. The exception handler should be exited using an IRET instruction. A simple 
RET instruction will not do because the 80286 pushes its flags onto its stack 
when the interrupt is executed. 


You should also remember that if the possibility of a recursive call to the error handler 
exists (which can happen if ENCODE retries an instruction with exceptions 
unmasked), all data storage used by your handler must be allocated on the 80286 
stack. This includes the ERRORS287 word and the entire ESTATE287 structure. 


Example of an 80287 Exception Handler Written in 
ASM286 

NAME HANDLER_287 

EXTRN DECODE: FAR 

EXTRN SIEVE: FAR 

EXTRN ENCODE: FAR 

EXTRN NORMAL: FAR 


CODE SEGMENT ER PUBLIC 


I_MASK EQU 0001H ; Pos itilen of “I" 
>; error bit and "I" 
; mask 
STACK_LAYOUT STRUC ; Pointed at by BP 
; during TRAP_HANDLER 
OPERATION DW ? ; ESTATE287 template 
; begins with this 
; line 
ARGUMENT DB ? 
ARG1 DW S DUP(?) 
ARGI_FULL DB ? 
ARG2 DW S DUP(?) 
ARG2_FULL DB ? 
RESULT DB ? 
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RES1 DW S DUP(?) 
RES1_FULL DB ? 
RES2 DW S DUPC?) 
RES2_ FULL DB ? 
FORMAT DB ? 
REGISTER DB ? 
CONTROL_WORD DW ? ; Start of 94-byte 
3 FSAVE template 
STATUS_WORD DW ? ; As it exists after 
; clearing exceptions 
TAG_WORD DW ? 
ERROR_POINTERS DW 4 DUPC?) 
STACK287 DT 8 DUPC?) ; Last line of FSAVE 
; and of ESTATE287 
RETRY_CONTROL DW ? ; Retry 80287 Control 
; setting for ENCODE 
RETRY_FLAG DB ? ; Boolean parameter to 
; ENCODE 
ERRORS287 DW ? ; 80287 Status Word 
; before clearing 
; You can place additional stack-allocated variables here, 
; for your custom code. You refer to them as 
; (BP].your_var_name. If the number of bytes of inserted 
; space is odd, you should eliminate the following dummy 
; variable. 
DUMMY_EVEN_ALIGN DB ? 3; Not used; filler to 
; keep SP even 
REGISTERS_286 DW 8 DUP(?) ; Pushed by 
; PUSH_REGISTERS 
FLAGS_286 DW ? ; Pushed by 80286 when 
; interrupt called 
RET_ADDRESS DD ? ; From TRAP_HANDLER 


STACK_LAYOUT ENDS 


; TRAP_HANDLER is a 
; written in ASM286, using 
; assumes that the 

B indicate 
; other 


“D", though we 
code to handle 


TRAP_HANDLER PROC FAR 
CALL PUSH_REGISTERS 
SUB SP,OFFSET REGISTERS_286 
MOV BP,SP 
FNSTSW [BP1].ERRORS287 
PUSH AX 


POP AX 
FNCLEX 


CALL PUSH_ESTATE_ERRORS 


functioning 80287 
the procedures 
only unmasked exceptions 
below where you 
exceptions. 


exception handler 

of EH287.LIB. It 
are "I" and 
could insert 


This interrupt will 
preserve 80286 registers 
Allocate room for 
STACK_LAYQUT 
Set up indexing 
STACK_LAYOUT 
Save the errors that 
caused the exception 
Arbitrary memory access 
to synchronize 

with the 80287 

Clear the exceptions so 
handler can use 80287 
Push parameters to 


into 
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; DECODE onto stack 
CALL DECODE ; ESTATE287 is now filled 
>; with valid data 
MOV AX,CBP].CONTROL_WORD ; Existing control word is 
; the default for 
MOV [BP].RETRY_CONTROL,AX ; any ENCODE retry 
; attempt 
MOV (CBP].RETRY_FLAG,OFFH ; Default setting: retry 
; will take place 
CALL PUSH_ESTATE_ERRORS ; Push parameters to 
; NORMAL onto stack 
CALL NORMAL ; Handle "D" errors 
RCR AL,1 ; Test Boolean answer: was 
; "D" the only error? 
JC ENCODE_LEXIT ; If so then no other 
; checking is necessary 
OR CBP].RETRY_CONTROL,I_MASK ; Mask "I" exception 
CALL PUSH_ESTATE_ERRORS ; Push parameters to SIEVE 
CALL SIEVE ; Check for legal non- 
; trapping NaN 
RCR AL, 1 ; Test Boolean anSwer: was 
; there such a NaN? 
JC ENCODE_EXIT ; If so then we can exit; 
; "I" has been cleared 
TEST (BP].ERRORS287,1_MASK ; Was "I" error bit set? 
JNZ ACTUAL_I_ERROR 
; Here you could insert code to examine [BP].ERRORS287 to 
; detect exceptions other than "I" or "D". If those 
; other exceptions are detected, you can provide your 
; own code to handle them. 
JMP ENCODE_EXIT 
ACTUAL_I_ERROR: 
; Here you may place your own customized code to deal 
; with "I" exceptions other than legal nontrapping 
; NaNs and denormalized inputs. The following lines set 
; the "I" error bit, mask the "I" exception, and drop 
; through to ENCODE_LEXIT. This simulates the masked "I" 
; exception, but with nontrapping NaNs implemented. 
; The user program must unmask the “I" exception when it 
; tests and clears the "I" error bit. 
OR (BP).STATUS_WORD,I_MASK 3 Set the "I" error bit 
OR ([BP].CONTROL_WORD,I_MASK ; Mask the "I" exception 
ENCODE_EXIT: 
CALL PUSH_ESTATE_ERRORS Push first two ENCODE 


PUSH [BP].RETRY_CONTROL 


PUSH WORD PTR (CBP].RETRY_FLAG 


CALL ENCODE 


parameters 

Push third ENCODE 
parameter 

Push fourth ENCODE 
parameter 

Restore post-exception 
80287 state 
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ADD SP,OFFSET REGISTERS_86 
storage 
CALL POP_REGISTERS 
registers 

Restore 80286 flags; 
long-return to caller 


TRET 


TRAP_HANDLER ENDP 


PUSH_ESTATE_ERRORS causes the two parameters 
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Release the STACK_LAYOUT 


Restore the eight 80286 


stack, prior to a call to one of the EH287.LIB procedures 


i 
; ESTATE287_PTR and ERRORS287 to be pushed onto the 80286 


which call for these parameters. 


PUSH_ESTATE_ERRORS PROC NEAR 
POP DX 
PUSH SS 


save the return address 


? 
; ESTATE287_PTR 
LEA AX,(CBP].Q0PERATION ; push the offset half of 
; ESTATE287_PTR 
PUSH AX ‘ 


PUSH CBP].ERRORS287 


push complete 

ERRORS287 is the bottom 
half of this byte 

this is the RETURN from 
PUSH_ESTATE_ERRORS 


JMP DX 
PUSH_ESTATE_ERRORS ENDP 


PUSH_REGISTERS causes the eight 80286 registers 
S1,DI,€S,BP,DX,CX,BX,AX to be pushed onto the 80286 
stack. The registers can be popped off with a call to 
POP_REGISTERS. 


PUSH_REGISTERS PROC NEAR 

PUSH DI 

PUSH ES 

PUSH BP 

PUSH DX 

PUSH CX 

PUSH BX 

PUSH AX 
Get stack pointer into an index 
register 
XCHG SI,C€BP+14] 
SI which is being saved 
This is the RETURN of the 
procedure 


JMP SI 


PUSH_REGISTERS ENDP 


; POP_LREGISTERS causes the eight registers which were 
3 pushed by PUSH_REGISTERS to be popped, restoring them 
; their original values. 


POP_REGISTERS PROC NEAR 

POP SI ; Hold this call’s return address 
temprarily in SI 
Get the stack pointer into an 
index register 
Restore SI, and position the 
return address 


MOV BP,SP 


XCHG SI,(BP+14] 


push the segment half of 


Exchange the return address with 


to 
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POP AX 
POP BX 
POP CX 
POP DX 
POP BP 
POP ES 
POP DI 
RET ; Return address is in position due 
; to above XCHG 
POP_REGISTERS ENDP 


CODE ENDS 


END 


Writing an 80287 Exception Handler in PL/M-286 Using 
EH287.LIB 


Following is a template of coding structure for any 80287 error handler written in 
PL/M-286. Note that many of the protocols required for an ASM 286 error handler 
are not needed in PL/M-286. They are provided automatically by PL/M-286 and its 
built-in functions. 


If your customized error recovery is limited to errors that do not examine the 
ESTATE287 structure, you can follow the simpler template given under FILTER. 


1. Your error handler procedure must have the attributes INTERRUPT and 
PUBLIC. 


2. You must declare the structure ESTATE287 and the WORD variable 
ERRORS287. 


3. If you use any other variables in your error handler, they should also be declared 
within the procedure. All data must be declared within the procedure for the 
error handler to be reentrant. 


You should make the assignment ERRORS287 = GET$REALSERROR. 
You should call DECODE with the approriate parameters. 


6. If you intend to use NORMAL and SIEVE, their calls should come immeditely 
after the call to DECODE. NORMAL and SIEVE require ESTATE287 to be 
defined by DECODE. If ESTATE287 has no values that could be output by 
DECODE, the results of NORMAL and SIEVE are undefined. 


7. If you have any customized code in your error handler, it should appear here. 


If the handler is returning to the calling environment, you should call ENCODE 
with the appropriate parameters. 


Example of an 80287 Exception Handler Written in 
PL/M-286 


HANDLER_MODULE: DO; 
DECODE: PROCEDURE CESTATE287_PTR,ERRORS287) EXTERNAL; 


DECLARE ESTATE287_PTR POINTER, ERRORS287 WORD; 
END; 
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ENCODE: PROCEDURE CESTATE287_PTR,ERRORS287,CONTROL287, 
RETRY_FLAG) EXTERNAL; 
DECLARE ESTATE287_PTR POINTER; 
DECLARE ERRORS287 WORD; 
DECLARE CONTROL287 WORD; 
DECLARE RETRY_FLAG BYTE; 
END; 


NORMAL: PROCEDURE CESTATE287_PTR,ERRORS287) BYTE EXTERNAL; 
DECLARE ESTATE287_PTR POINTER, ERRORS287 WORD; 
END; 


STEVE: PROCEDURE CESTATE287_PTR,ERRORS287) BYTE EXTERNAL; 
DECLARE ESTATE287_PTR POINTER, ERRORS287 WORD; 
END; 


/* TRAP_LHANDLER is a functioning 80287 exception handler 
written in PL/M-286, using the procedures of EH287.LIB. 
It assumes that the only unmasked exceptions are "J" 
and "D", though we indicate below where you could 
insert code to handle other exceptions. */ 


DECLARE ISERRORSBIT LITERALLY ‘0001H’; /* To set the "I" 


errar bit *7/ 
DECLARE TRUE LITERALLY ‘OFFH’: 


TRAP_HANDLER: PROCEDURE INTERRUPT PUBLIC; 


DECLARE ESTATE287 STRUCTURE (¢ 
OPERATION WORD, 
ARGUMENT BYTE, 
ARG1(S) WORD, ARGI_FULL BYTE, 
ARG2(S) WORD, ARG2_FULL BYTE, 
RESULT BYTE, 
RES1(5) WORD, RES1_FULL BYTE, 
RES2(5) WORD, RES2@_FULL BYTE, 
FORMAT BYTE, 
REGISTER BYTE, 
CONTROL_WORD WORD, 
STATUS_WORD WORD, 
TAG_WORD WORD, 
ERROR_POINTERSC4) WORD, 
STACK_87(040) WORD); 

DECLARE ERRORS287 WORD; 

DECLARE CONTROL287 WORD; 

DECLARE RETRY_FLAG BYTE; 


ERRORS287 = GETSREALSERROR; 

CALL DECODECQ@ESTATE287,ERRORS287); 
CONTROL287 = ESTATE287.CONTROL_WORD; 
RETRY_FLAG = TRUE; 


IF NOT NORMALC@ESTATE287,ERRORS287) 
THEN DO; 
CONTROL287 = CONTROL287 OR ISERRORSBIT; 
IF NOT STEVECQ@ESTATE287,ERRORS287) 
THEN DO; 
IF ERRORS287 
THEN DO; 
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/* Here you may place your own customized code to 
deal with "I" exceptions other than non- 
trapping NaNs and denormalized inputs. The 
following lines set the "I" error bit, mask the 
"IT" exception, and drop through to the RETRY 
exit. This simulates the masked "I" exception, 
but with nontrapping NaNs implemented. The 
user program must unmask the "I" exception when 
it tests and clears the "I" error bit. */ 

ESTATE287.STATUS_WORD = ESTATE287.STATUS_WORD OR 

ISERRORSBIT; 

ESTATE287.CONTROL_WORD = CONTROL287; 

END; 

ELSE DO; 

/* Here you could insert code to examine ERRORS287 
to detect exceptions other than "I" and "D". If 
those other exceptions are detected, you can 
provide your own code. */ 

END; 

END; 
END; 


CALL ENCODEC@ESTATE287,ERRORS287,CONTROL287,RETRY_FLAG); 
END TRAP_HANDLER; 


END HANDLER_MODULE; 
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DECODE — Decode trapped operation and save 80287 status 


Input 


Two parameters, totalling six bytes, must be pushed onto the 80286 stack before 
calling DECODE. 


First, the four-byte pointer ESTATE287_PTR is pushed. As usual, the segment of 
ESTATE287_PTR is pushed first, followed by the offset. DECODE sends its output 
to the 144-byte memory buffer pointed to by ESTATE287_PTR. 


Second, a two-byte quantity, the bottom byte of which is ERRORS287, is pushed 
onto the stack. ERRORS287 is the bottom byte of the 80287 status word as it existed 
when the trap handler was called, before the exceptions were cleared. The top byte 
of the two-byte quantity is ignored. 


Function 


DECODE provides, in a standardized format, all the information an exception handler 
might need to deal with the error condition. This includes the complete state of the 
80287, the identity of the offending operation, and the existence, formats, and values 
of any arguments or results. 


DECODE has programmed into it the error calling specifications of all 80287 
instructions and all CEL287.LIB functions. Once DECODE has identified the inter- 
rupted operation, it uses these specifications to fill ESTATE287 with the correct 
arguments and results. 


An exception to the programming specifications occurs for the CEL287 functions 
that return values in 80286 registers. These functions are mqerlA2, mqerlA4, 
mgerIC2, mgerIC4, mgerlE2, and mqerIE4. The results are specified by DECODE 
to go to the 80287 stack, not to 80286 registers. 


DECODE identifies DC287 errors by setting OPERATION to 0C8 hex, but no 
information about DC287 arguments or results is available because they reside in a 
location on the 80286 stack unknown to DECODE. 


Note that for FCOMP and FCOMPP instructions with denormal arguments the trap 
handler is called with the inputs already popped off the 80287 stack. DECODE 
recovers these arguments from the bottom of the 80287 stack and pushes them back 
onto the stack top. 


Output 


All output is performed through the 144-byte memory buffer pointed at by the input 
parameter ESTATE287_PTR. The fields of the ESTATE287 structure are described 
in “The ESTATE287 Data Structure” at the beginning of this chapter. 


The 80287 itself is left completely cleared to its initialized state. This is the input 
state expected by the other procedures of EH287.LIB. 


PL/M-286 Declaration and Calling Sequence 


DECODE: PROCEDURE CESTATE287_PTR,ERRORS287) EXTERNAL; 
DECLARE ESTATE287_PTR POINTER, ERRORS287 WORD; 
END; 
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ESTATE287 
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/* Assume is already declared as presented 
earlier in this chapter */ 

DECLARE ERRORS287 WORD; 

/* Assume ERRORS287 has been set to the value of the bottom 
part of the 80287 status word before exceptions were 
cleared. */ 

CALL DECODEC @ESTATE287, ERRORS287 ); 

ASM286 Declaration and Calling Sequence 

; the following line must occur outside of all SEGMENT- 

; ENDS pairs 

EXTRN DECODE: FAR 
ESTATE_TEMPLATE STRUC 
DB 144 DUPC(?) ; The individual fields of ESTATE287 
; can be declared 
3; as in STACK_LAYOUT at the 
; beginning of this chapter. 
ESTATE_TEMPLATE ENDS 
DATA SEGMENT 
ESTATE_287 ESTATE_TEMPLATE 
ERRORS287 DW 2 

DATA ENDS 

; the following code assumes that DS contains the segment 

; of ESTATE287 

ASSUME DS:DATA 
PUSH DS ; push the segment of 
; ESTATE287 onto the stack 
MOV AX,OFFSETCESTATE287) 
PUSH AX ; 4-byte pointer is now 
; pushed onto stack 
MOV AL,ERRORS287 ; second parameter 
PUSH AX ; pushed onto stack 
CALL DECODE ; ESTATE287 is now filled 
>; with information 
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ENCODE — Restore 80287 status and operation environment 


Input 


ENCODE expects the 80287 to be completely cleared to its initialized state. Infor- 
mation about the 80287 is obtained from ESTATE287, not from the entry state of 
the 80287 itself. 


Four parameters, totalling ten bytes, must be pushed onto the 80286 stack before 
calling ENCODE. The first parameter is four bytes; each of the other three param- 
eters is two bytes. 


The first parameter, ESTATE287_PTR, points to the 144-byte ESTATE287 struc- 
ture that was filled by a previous call to DECODE and possibly modified by inter- 
vening code. ESTATE287_PTR is a four-byte pointer with the segment pushed first 
and the offset pushed next. 


The second parameter pushed onto the stack is ERRORS287. ERRORS287 is a 
WORD parameter, the bottom byte of which is the bottom byte of the 80287 status 
word as it existed when the trap handler was called, before the exceptions were cleared. 
The top byte of ERRORS287 is ignored. 


The third parameter, CONTROL287, is a WORD parameter. It contains the value 
the caller wants to place into the 80287 control word before retrying the function 
when RETRY_FLAG is true. If RETRY_FLAG is false, CONTROL287 is ignored. 


The fourth and last parameter pushed onto the stack is RETRY_FLAG. RETRY 
_FLAG is a BYTE parameter, the bottom half of the WORD that is pushed onto 
the 80286 stack (the top half is ignored). RETRY_FLAG is a Boolean control input 
that tells ENCODE what action to take after restoring the 80287 environment, as 
described below. 


Function 


ENCODE restores the 80287 to a state that represents the completion of the opera- 
tion that caused an error trap. This is accomplished by restoring the 80287 to the 
state stored in the ESTATE287 structure, after performing one of two actions, 
depending on RETRY_FLAG. 


If the bottom bit of RETRY_FLAG is 0, the operation is assumed to have already 
been performed, and the results are assumed to be in ESTATE287. The results are 
copied to their destination. If insufficient results are available in ESTATE287, the 
value INDEFINITE may be used. 


If the bottom bit of RETRY_FLAG is I, the operation is identified from ESTATE287 
and reperformed using operands as specified in ESTATE287. The parameter 
CONTROL287 is used as the 80287 control word for the retry; you can thus select 
which exceptions will be unmasked. After the retry is complete, the 80287 control 
word as it exists in ESTATE287 is restored. 


If the operation being retried is a load or store that merely moves data without trans- 
forming it, ENCODE will perform the operation, with exceptions masked, using the 
ARGUMENT and RESULT information of ESTATE287. This allows you to cali 
ENCODE, with a true RETRY_FLAG in all cases when NORMAL returns TRUE, 
without fear that the retry will repeat the D error. 


Note that ENCODE cannot be called with RETRY_FLAG true if the error came 
from DC287, because ESTATE287 contains insufficient information about DC287. 
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For the same reason, ENCODE cannot retry the CEL287 functions mgerIC2, 
mgerIC4, mqerlE2, or mgerlE4 after a P precision error. 


ENCODE can perform the retry for I errors that come from the above four CEL287 
functions as well as from mqerIA2 and mgerIA4, but the results will go to the 80287 
stack—not to the correct 80286 registers. Your code must identify these functions 
and pop the answer from the 80287 to the correct destination in order to resume 
execution of the trapped program. 


If your CONTROL287 parameter contains unmasked exceptions, it is possible for 
an exception handler to be called during the retry and for ENCODE to be invoked 
recursively. If you unmask the exception that caused the error, you should have 
modified the original arguments or results to avoid an infinite recursion. 


Output 


ENCODE returns with the 80287 restored to the appropriate post-exceplion state, as 
indicated by ESTATE287 and the effects of either the retry or the movement of 
results to their destination. Also, the input parameters are popped from the 80286 
stack. 


PL/M-286 Declaration and Calling Sequence 


ENCODE: PROCEDURE CESTATE287_PTR,ERRORS287,CONTROL287, 
RETRY_FLAG) EXTERNAL; 
DECLARE ESTATE287_PTR POINTER; 
DECLARE ERRORS287 WORD; 
DECLARE CONTROL287 WORD; 
DECLARE RETRY_FLAG BYTE; 
END; 


/* Assume ESTATE287 is already declared as presented 
earlier in this chapter. */ 


DECLARE ERRORS287 WORD; 
DECLARE CONTROL287 WORD; 
DECLARE RETRY_FLAG BYTE; 


/* Assume that all the parameters have been filled with 
values. */ 


CALL ENCODEC @ESTATE287, ERRORS287, CONTROL287, RETRY_FLAG ); 

/* The 80287 has now been returned to an appropriate post- 
exception state. */ 

ASM7286 Declaration and Calling Sequence 


; the following line must occur outside of all SEGMENT- 
; ENDS pairs 


EXTRN ENCODE: FAR 
DATA SEGMENT 
ESTATE_287 ESTATE_TEMPLATE 


ERRORS287 DW ? 
DATA ENDS 
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3 The following code assumes that DS contains the segment 
; of ESTATE287. It also assumes that the parameters to 
; ENCODE have been set to appropriate values. 


ASSUME DS:DATA 
PUSH DS ; push the segment of 

; ESTATE287 onto the stack 
MOV AX,OFFSETCESTATE287) 
PUSH AX 3 4-byte pointer is now 

3 pushed onto stack 
MOV AX,ERRORS287 
PUSH AX second parameter is 
pushed onto stack 


MOV AX,CONTROL287 load third parameter 


PUSH AX push onto stack 
MOV AL, RETRY_FLAG last parameter 
PUSH AX pushed onto stack 


CALL ENCODE 


; the 80287 is now restored to an appropriate post- 
; exception state 
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FILTER — Filter denormals and nontrapping NaNs from user 
error handling 


Input 


The two-byte quantity, the bottom byte of which is ERRORS287, is pushed onto the 
80286 stack before calling FILTER. ERRORS287 is the bottom byte of the 80287 
status word as it existed when the trap handler was called, before the exceptions were 
cleared. The top byte of the two-byte quantity is ignored. 


Function 


FILTER provides a single interface to EH287.LIB, which calls all of the other four 
functions (DECODE, SIEVE, NORMAL, and ENCODE). If ERRORS287 indicates 
that a D error caused the trap handler to be called, the denormal argument is found 
and normalized. If an | error caused the trap, FILTER indicates whether the excep- 
tion was caused by a legal nontrapping NaN. 


FILTER is a Boolean function. It returns TRUE if the trap was indeed caused by 
one of the above-mentioned I or D cases. TRUE means that you may return immedi- 
ately from the trap handler. FILTER returns FALSE if it has not handled the error. 
If FILTER returns FALSE, your trap handler should execute appropriate custom- 
ized error recovery. 


Output 


The Boolean value of FILTER is output as the bottom bit of the AL register. The 
input word ERRORS287 is popped from the 80286 stack upon return. 


If FILTER returns FALSE, the 80287 is returned to the same state that it was prior 
to the call to FILTER. 


If FILTER returns TRUE, the 80287 is changed to reflect a retry of the instruction 
with normal operands (in case of a D error) or I masked (in case of an I error). 


PL/M-286 Programming Example 
FILTER_MODULE: DO; 


FILTER: PROCEDURE CERRORS287) BYTE EXTERNAL; 
DECLARE ERRORS287 WORD; 
END; 


/* SIMPLE_TRAP_HANDLER is a floating-point exception 
handler which provides a bare minimum interface to 
EH287.LIB. If the error which caused this interrupt has 
been handled by FILTER, then the interrupt returns to 
the user program immediately. Otherwise, your inserted 
custom code is executed. */ 


SIMPLE_TRAP_HANDLER: PROCEDURE INTERRUPT PUBLIC; 
DECLARE ERRORS287 WORD; 


IF FILTER CERRORS287 := GETSREALSERROR) THEN RETURN; 
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/* Here you 
than the 


FILTER. 


could place 
denormals an 
ad 

END SIMPLE_TRAP_HANDLER; 


END FILTER_MODULE; 


ASM286 Programming Example 
NAME FILTER_MODULE 
EXTRN FILTER: FAR 
CODE SEGMENT ER PUBLIC 
STACK_LAYOUT STRUC 

You can 


1 
3 for your 
3 BP.your_ 


place additional 
custom code. Yo 
var_name. 


ERRORS287 


DW ? 


REGISTERS_286 DW 8 DUP(?) 
FLAGS _286 DW ? 


RET_LADDRESS DD 


2 
STACK_LAYOUT ENDS 


a 
a 


; SIMPLE_TRAP_HANDLER is 
; handler which provides 

; EH287.LIB. If the error 
; been handled by FILTER, 
3 the user program immedia 
; custom code is executed. 


SIMPLE_TRAP_HANDLER PROC F 


CALL PUSH_REGISTERS 
SUB SP,OFFSET REGISTERS_2 


MOV BP,SP 
FNSTSW 


[BP].ERRORS287 


MOV AX, 
PUSH AX 


[BP].ERRORS287 


FNCLEX 
CALL FILTER 


RCR AL,14 
JC TRAPLEXIT 
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code 
d 


to handle exceptions other 
nontrapping NaNs handled by 


; Pointed at by BP during 
; SIMPLE_TRAP_HANDLER 


stack-allocated variables 
refer to them as 


here, 
u 


80287 status 
clearing 
Pushed by PUSH_REGISTERS 
Pushed by 80286 when interrupt 
called 

From SIMPLE_TRAP_HANDLER 


word before 


floating-point 
bare minimum interface to 
which caused this interrupt has 
then the interrupt returns to 
tely. Otherwise, your inserted 


exception 


AR 


Save the 80286 
Allocate room 
; layout 
; Set up 

; STACK_LAYOUT 

; Save the errors 
; the exception 

; Fetch the status 
‘ and store it 
; parameter 
? 

’ 


registers 
86; for stack 


indexing into 


that caused 
word «.s 
as FILTER 
Clear the exceptions 
handler can use 80287 
Check for denormal or 
trapping NaN 
handled? 

do nothing more 


50 


non- 


Was 
lf 


error 


so then 
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i Here you could place code to handle exceptions other 
; than the denormals and nontrapping NaNs handled by 
; FILTER. 


TRAPLEXIT: 
CALL POP_REGISTERS i; Restore the 80286 registers 
TRET 


SIMPLE_TRAP_HANDLER ENDP 


3 PUSH_REGISTERS causes the eight 80286 registers 

+ $1,018, ES. BP ,DX, CX, BX,AX ke be pushed onto the 80286 

3 stack. The registers can be popped off with a call to 
; POPLREGISTERS. 


PUSH_REGISTERS PROC NEAR 
PUSH DI 
PUSH ES 
PUSH BP 
PUSH DX 
PUSH CX 
PUSH BX 
PUSH AX 
MOV BP,SP 3 Get stack pointer into an index 

; register 

; Exchange the return address with SI 

; which is being saved 

JMP ST 3 This is the RETURN of the procedure 

PUSH_REGISTERS ENDP 


XCHG SI,CBP+14] 


; POP_LREGISTERS causes the eight registers which were 
; pushed by PUSH_REGISTERS to be popped, restoring them to 
3 their original values. 


POP_REGISTERS PROC NEAR 


POP SI Hold this call’s return address 
temporarily in SI 
MOV BP,SP Get the stack pointer into an index 


register 
Restore SI, and position the return 
address 


XCHG SI1,(BP+14] 


POP AX 
POP BX 
POP CX 
POP DX 
POP BP 
POP ES 
POP DI 
RET 3 Return address is in position due to above 
; XCHG 
POP_LREGISTERS ENDP 


CODE ENDS 


END 


5-19 


The Error Handler Module 80287 Support Library 


NORMAL — Detect and normalize D error nonnormal arguments oO 


Input 


NORMAL expects the 80287 to be completely cleared to its initialized state. Infor- 
mation about the 80287 is obtained from ESTATE287, not from the entry state of 
the 80287 itself. 


Two parameters, totalling six bytes, must be pushed onto the 80286 stack before 
calling NORMAL. 


First, the four-byte pointer ESTATE287_PTR is pushed. The segment of 
ESTATE287_PTR is pushed first, followed by the offset. ESTATE287_PTR points 
to the 144-byte ESTATE287 structure that was filled by a previous call to DECODE. 


Second, a two-byte quantity, the bottom byte of which is ERRORS287, is pushed 
onto the stack. ERRORS287 is the bottom byte of the 80287 status word as it existed 
when the trap handler was called, before the exceptions were cleared. The top byte 


of the two-byte quantity is ignored. Oo 
Function 


NORMAL first checks ERRORS287 to see if the D error bit is the only unmasked 
error bit that is set. If this is not the case, NORMAL immediately returns FALSE, 
indicating that no normalization retry is to take place. 


If D is set and no other unmasked error bits are sel, NORMAL returns TRUE. If 

the operation that caused the D error was a load operation, the nonnormal arguments 

are left unchanged. If the operation was not a load operation, NORMAL modifies oO 
the denormal arguments. Denormal SHORT_REAL and LONG_REAL arguments 

are normalized: denormal TEMP_REAL arguments are converted to zero. Only the 

copies of arguments in ESTATE287’s ARGI and ARG? fields are modified. 


Whenever NORMAL returns TRUE, you should call ENCODE with RETRY 
_FLAG set to TRUE. You may leave D unmasked, using the same control word in 
effect when the trap handler was called. If the operation was a load instruction, 
ENCODE will perform the load with D masked and not cause a repeat of the D 
error. 


Note that NORMAL always returns FALSE if the operation that caused the trap is oO 
DC287 or a CEL287 function. Only individual 80287 instructions can cause a D 

error. 

Output 

NORMAL returns normalized arguments by modifying ESTATE287. In addition, it * 


returns a Boolean value in the AL register, indicating further action to be taken. If 
the bottom bit of AL is 1, a normalization has taken place, and NORMAL is 
requesting the caller to retry the offending operation by calling ENCODE with a 
true RETRY_FLAG. If the bottom bit of AL is 0, no such retry is requested. 


NORMAL returns the 80287 itself to the same cleared state it had upon entry. 


PL/M-286 Declaration and Calling Sequence 


NORMAL: PROCEDURE CESTATE287_PTR,ERRORS287) BYTE EXTERNAL; 
DECLARE ESTATE287_PTR POINTER, ERRORS287 WORD; 
END; 


5-20 


80287 Support Library The Error Handler Module 


7* Assume ESTATE287 is already declared as presented 
earlier in this chapter #*#/ 


DECLARE ERRORS287 WORD; 
DECLARE NORM_RETRY BYTE; 


NORM_LRETRY = NORMALC gESTATE287, ERRORS287 ); 


/* Now NORM_RETRY is true if a retry of the operation 
should be made */ 


ASM286 Declaration and Calling Sequence 


; the following line must occur outside of all SEGMENT- 
; ENDS pairs 


EXTRN NORMAL: FAR 


DATA SEGMENT 


ESTATE_287 ESTATE_TEMPLATE 
ERRORS287 DW ? 
NORM_RETRY DB ? 

DATA ENDS 


3 the following code assumes that DS contains the segment 
; of ESTATE287 


ASSUME DS:DATA 


PUSH DS ; push the segment of ESTATE287 onto 
; the stack 
MOV AX,OFFSETCESTATE287) 
PUSH AX 3 4-byte pointer is now pushed onto 


; stack f 
MOV AL,ERRORS287 ; second parameter 
PUSH AX ; pushed onto stack 
CALL NORMAL ; AL now tells whether to retry 
MOV NORM_RETRY,AL ; Boolean answer stored in NORM_RETRY 
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SIEVE — Detects nontrapping NaNs that should be ignored oO 


Input 


SIEVE expects the 80287 to be completely cleared to its initialized state. Information 
about the 80287 is obtained from ESTATE287, not from the entry state of the 80287 
itself. ‘ 


Two parameters, totalling six bytes, must be pushed onto the 80286 stack before 
calling SIEVE. 


First, the four-byte pointer ESTATE287_PTR is pushed. The segment of 
ESTATE287_PTR is pushed first, followed by the offset. ESTATE287_PTR points 
to the 144-byte ESTATE287 structure that was filled by a previous call to DECODE. 


Second, a two-byte quantity, the bottom byte of which is ERRORS287, is pushed 
onto the stack. ERRORS287 is the bottom byte of the 80287 status word as it existed 
when the trap handler was called, before the exceptions were cleared. The top byte 
of the two-byte quantity is ignored. #) 


Function 


SIEVE signals those cases in which the | exception should not have been given because 
the argument was a legal nontrapping NaN. This detection applies to all arithmetic 
operations that check for NaN inputs. 


SIEVE follows the conventions described in “‘Nontrapping NaNs” and “Nonordered 

Comparisons” near the beginning of this chapter. If it is determined that this I error oO 
should not have taken place because the NaN arguments are nontrapping and the 

operation is not an ordered comparison, SIEVE returns TRUE. In this case, the caller 

should retry the offending operation by calling ENCODE with a true RETRY 

_FLAG and CONTROL287 modified so that I is masked. ENCODE restores the 

original contro! word, with I unmasked, after the retry is executed. 


If it is determined that this I error should still be flagged (for example, a stack error 
has occurred), SIEVE returns FALSE. Some appropriate I error recovery action 
should be performed. 


Note that if the operation that caused the trap is DC287 or a CEL287 function, Oo 


SIEVE always returns FALSE. All legal nontrapping NaNs arise from individual 
80287 instructions. 


Output 

The Boolean answer is returned as the bottom bit of the AL register. If this bit is 1, 
the I error should not have taken place, (according to the nontrapping NaN conven- 
tions described carlier in this chapter). 


SIEVE leaves the 80287 in the same cleared state it had upon entry. The ESTATE287 
structure is also unchanged by SIEVE. 


PL/M-286 Declaration and Calling Sequence 


SIEVE: PROCEDURE CESTATE287_PTR,ERRORS287) BYTE EXTERNAL; oO 
DECLARE ESTATE287_PTR POINTER, ERRORS287 WORD; 
END; 


80287 Support Library The Error Handler Module 


7* Assume ESTATE287 is already declared as presented 
earlier in this chapter */ 


DECLARE ERRORS287 WORD; 
DECLARE LEGAL_NAN BYTE; 


LEGAL_NAN = SIEVEC @gESTATE287, ERRORS287 ); 


/* Now LEGAL_NAN is true if there should not have been an 
eI" error 8% 


ASM286 Declaration and Calling Sequence 


; the following line must occur outside of all SEGMENT- 
; ENDS pairs 


EXTRN SIEVE: FAR 


DATA SEGMENT 
ESTATE_287 ESTATE_TEMPLATE 
ERRORS287 DW ? 

DATA ENDS 


; the following code assumes that DS contains the segment 
; of ESTATE287 


ASSUME DS:DATA 


PUSH DS push the segment of ESTATE287 onto 


; 
; the stack 
MOV AX,OFFSETCESTATE287) 
PUSH AX ; 4-byte pointer is now pushed onto 


stack 

second parameter 

pushed onto stack 

AL now contains Boolean answer 
LEGAL_NAN true if there is no 
wT Y Sere 


MOV AL,ERRORS287 
PUSH AX 

CALL SIEVE 

MOV LEGAL_NAN,AL 


Binding EH287.LIB to Program Modules 


This section tells how to bind EH287.LIB into your program using a BND286 
command. 


If you are linking both CEL287.LIB and EH287.LIB, it is absolutely necessary that 
EH287.LIB appear after CEL287.LIB in the BND286 command for this reason: 
EH287.LIB contains references to all the functions of CEL287.LIB. However, if there 
are any unused CEL287 functions, they do not need to be linked for EH287.LIB to 
work correctly. We have therefore provided public symbols for CEL287.LIB in 
EH287.LIB, all of which point to an 80286 HLT instruction. CEL287.LIB must 
appear first in the BND286 invocation to pick up the actual references to CEL287.LIB 
functions; then EH287.LIB will supply HLT references (which do not add to the 
code size) for all unused CEL287 symbols. 


If you mistakenly put CEL287.LIB after EH287.LIB in your bind invocation, the 
bind will perform without any visible problems, but all calls to CEL287.LIB will go 
toa HLT instruction. When you attempt to execute your program, the NDP will halt 
the first time a CEL287 function is called. 


The Error Handler Module 


You must bind in the 80287.LIB when using EH287.LIB. 


Following is the recommended module order in the BND286 statement: 


Your object modules 

DC287.LIB (if your program uses it) 
CEL287.LIB (if your program uses it) 
EH287.LIB 

80287.LIB 


For example, if your modules are MYMODI.OBJ and MYMOD2.OBJ, issue the 
following command: 


Jeseeeuess Kis. cased 
peeneoger LID, eh SGE 5 


If you have a single module MYPROG.OBJ and do not use any libraries other than 
EH287.LIB, issue the following command: 


By BINIDIZIGGR e 


NOTE 


If you are writing your own specialized interrupt handler, you will need to 
use BLD286 to create the interrupt table entry. Also, you must include the 
NOLOAD control in the above BND286 command lines. 


80287 Support Library 


CHAPTER 6 


IMPLEMENTING THE IEEE STANDARD 


The NDP, together with the 80287 Support Library, provides an implementation of 
‘““A Proposed Standard for Binary Floating-Point Arithmetic,” Draft 10.0 Task P754, 
December 2, 1982. 


This chapter describes the relationship between the NDP and the IEEE Standard. It 
gives the choices made in this book for the places where the Standard has options. It 
pinpoints two areas in which the book does not conform to the Standard. If your 
application requires it, you can provide software to meet the Standard in these areas. 
The book indicates how to write this software. 


This chapter contains many terms that have precise technical meanings, as specified 
by the Standard. The Standard’s convention of emphasizing the precise meaning by 
capitalizing those terms is used. The Glossary provides the definitions for all capital- 
ized phrases in this chapter. 


Options Chosen 


The SHORT_REAL and LONG_REAL formats conform perfectly to the Stand- 
ard’s Single and Double Floating-Point Numbers, respectively. The TEMP_REAL 
format is the same as the Standard’s Double Extended format. The Standard allows 
a choice of Bias in representing the exponent; the Bias 16383 decimal has been chosen. 


For the Double Extended format, the Standard contains an option for the meaning 
of the minimum exponent combined with a nonzero significand. The Bias for this 
special case can be either 16383, as in all the other cases, or 16382, making the 
smallest exponent equivalent to the second-smallest exponent. The Bias 16382 has 
been chosen for this case, allowing you to distinguish between Denormal numbers 
(integer part is zero, fraction is nonzero, Biased Exponent is 0) and Unnormal numbers 
of the same value (same as the denormal except the Biased Exponent is |.) 


The Standard endorses the support of only one extended format. That format is 
provided here. 


The Standard allows you to specify which NaNs are Trapping and which are 
Nontrapping. EH287.LIB, which provides a software implementation of Non- 
trapping NaNs, defines the distinction. If the most significant bit of the fractional 
part of a NaN is I, the NaN is Nontrapping. If it is 0, the NaN is Trapping. 


When a masked I error involves two NaN inputs, the Standard lets you set the rule 
for which NaN is output. The NaN whose absolute value is greatest has been chosen. 


Areas Needing the Support Library to Meet the Standard 


The standard has five features that are not implemented directly on the 80287. 


1. The Standard requires you to provide a Normalizing Mode in which any nonnor- 
mal operands to functions are automatically normalized before the function is 
performed. The NPX instead has a D exception (not mentioned in the Standard), 
which gives the exception handler the opportunity to perform the normalization 
specified by the Standard. The D exception handler provided by EH287.LIB 
completely implements the Standard’s Normalizing Mode for Single and Double 
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precision arguments. Normalizing mode for Double Extended operands is imple- 
mented with one non-Standard feature, mentioned in the next section. 


2. The Standard specifies the “equal” comparison test yield an answer of FALSE, 
with no I error.if the relation between the input operands is unordered. The 80287 
FCOM and FTST instructions issue an I error for this case. The EH87.LIB error 
handler filters out the I error, using the following convention: whenever an FCOM 
or FTST instruction is followed by a MOV AX,AX instruction (8BCO hex), and 
neither argument is a trapping NaN, the error handler assumes that a Standard 
equal comparison was intended and returns the correct answer with I erased. 
Note that I must be unmasked for this action to occur. 


3. The Standard requires you to provide two kinds of NaNs, Trapping and 
Nontrapping. Nontrapping NaNs do not cause further I errors when they occur 
as operands to calculations. The NPX directly supports only Trapping NaNs. 
The EH287.LIB error handler module implements Nontrapping NaNs by 
returning the correct answer with I erased. Note that I must be unmasked for 
this action to occur. 


4. The Standard requires all functions that convert real numbers to integer formats 
to automatically normalize the inputs if necessary. The 80287 FIST instruction 
does not do so. CEL287.LIB’s integer conversion functions fully meet the Stand- 
ard in this aspect. 


5. The Standard specifies the remainder function that is provided by mqerRMD in 
CEL287.LIB. The 80287 FPREM instruction returns answers in a different range. 


Further Software Required to Meet the Standard 


Two cases exist in which you will need to provide further software to meet the Stand- 
ard. This software is not provided, because a vast majority of applications never 
encounter these cases. 


1. Nontrapping NaNs are not implemented when I is masked. Likewise, the Stan- 
dard’s “equal” function is not implemented when I is masked. You can simulate 
the Standard’s concept of a masked I exception by unmasking the 80287 I bit 
and providing an I trap handler that supports Nontrapping NaNs and the “equal” 
function, but otherwise acts just as if | were masked. Chapter 5 contains examples 
in both ASM 286 and PL/M-286 for doing this. 


2. Denormal operands in the TEMP_REAL format are converted to 0 by the 
EH287.LIB Normalizing Mode, giving sharp Underflow to 0. The Standard 
specifies that the operation be performed on the real numbers represented by the 
Denormals, giving gradual Underflow. To correctly perform such arithmetic, you 
will have to normalize the operands into a format identical to TEMP_REAL, 
except for two extra exponent bits, then perform the operation on those numbers. 
Thus, your software must manage the 17-bit exponent explicitly. 


It is probably disadvantageous for most users to increase the size of the Normalizing 
routine by the amount necessary to provide this expanded arithmetic. The 
TEMP_REAL exponent field is much larger than the LONG_REAL exponent field; 
thus, it is extremely unlikely that you will encounter TEMP_REAL Underflow. If 
meeting the Standard is a more important criterion to you than the choice between 
Normalizing and warning modes, you can select warning mode (D masked), which 
fully meets the Standard. 


If you do wish to implement the TEMP_REAL arithmetic with extra exponent bits, 
see the following useful pointers about when the D error occurs: 


a. TEMP_REAL numbers are considered Denormal by the NPX whenever the 
Biased Exponent is 0 (minimum exponent). This is true even if the explicit integer 
bit of the significand is 1. Such numbers can occur as the result of Underflow. 
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b. The 80287 FLD instruction can cause a D error if a number is being loaded from 
memory. It cannot cause a D error if it is coming from elsewhere in the 80287 
stack. 


c. The 80287 FCOM and FTST instructions cause a D error for unnormal operands 
as well as denormal operands. 


d. When both D and I errors occur, you will want to know which is signalled first. 
When a comparison instruction is issued between a nonexistent stack element 
and a Denormal number in 80286 memory, the D and I errors are issued simul- 
taneously. In all other situations, a stack I error takes precedence over a D error, 
and a D error takes precedence over a nonstack I error. 
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USING THE 80287 SUPPORT LIBRARY 


WITH PASCAL PROGRAMS 


The 80287 Support Library provides internal support for Pascal-286 programs that 
require manipulation of Real data types and error handling capabilities. The appro- 
priate libraries must be bound to the Pascal object code to ensure complete numeric 
function. 


CEL287.LIB 


Pascal programs that use any of the following functions must be combined with the 
CEL287 Library to prevent any unresolved external errors from occuring. If these 
functions are not used, the CEL287 Library is not required. The functions that require 
CEL287 support are SQR, SQRT, EXP, LN, SIN, COS, TAN, ARCSIN, ARCCOS, 
ARCTAN, TRUNC, ROUND, LTRUNC, and LROUND. 


EH287.LIB 


To implement the [EEE Math Standard and provide error handling capabilities, the 
EH287 Library must be bound to the Pascal object code. The IEEE standard is 
provided through Rounding, Precision, and Normalization controls in the Library. 
Two Pascal functions also use the Library for error handling—GET8087ERRORS 
and MASK8087ERRORS. Because of the controls provided by this library, any 
Pascal-286 program that performs numeric manipulations should be bound to this 
library. The formats of the two above functions are as follows: 


GETSO87ERRORS (variable) 
where variable is of the type AT87ERRORS: 


Type ATS7ERRORS = SET OF ATS7EXCEPTIONS; 
ATS87EXCEPTIONS = 
CATB7NVLD, ATS7DENR, ATB7ZD1IX, ATB7OVER, 
ATB7UNDR, ATS7PRCN, ATS7RSVD); 


Note that: 


« AT87NVLD, AT87DENR, AT87ZDIV, AT87O0VER, AT87UNDR, and 
AT87PRCN represent 80287 exception (or error) flags. 


* AT87RSVD is the Reserved location and AT87MASK is the Interrupt enable 
bit of the 80287. 


* GET8087ERRORS returns the values of the flag bits for use with error handling 
routines. 


Example 
GET8O87ERRORS Cerrors) ; 


where 
errors is of type AT87ERRORS, defined above. 


MASKB8087ERRORS (expression) 


Using the 80287 Support Library with Pascal Programs 80287 Support Library 


where 
expression indicates which 80287 exceptions will be masked or disabled. 


This function sets the Real error mask on the 80287 and can be used to change the 
numeric controls used in processing Real arithmetic. 


Examples 


MASK8087ERRORS CLATS7DENR, ATS87ZDN, ATS7OVER, 
AT87UNDR, ATS87PRCN)), 


This is the initial setting. [t corresponds to masking all exceptions except INVALID 
and enabling Interrupts. 


MASKSOS7ERRORS (01); 


This resets the error mask such that all errors are unmasked and all interrupts are 
enabled. 
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THE 80287 EMULATOR 


The 80287 emulator is a software module that exactly duplicates all the functions of 
the 80287. You can use the emulator to develop prototypes for systems that will have 
an 80287 or you can use the emulator if you need the 80287’s floating-point capabil- 
ities but do not need its speed. 


The 80287 emulator is available in the 8086 Software Toolbox. Instructions for using 
the emulator are contained in the 8086 Software Toolbox Manual, order number 
122203. 


For more information on this product, contact your Intel representative. 
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APPENDIX C 
SUMMARY OF 80287 
FLOATING-POINT FORMATS 


The 80287 supports three real number formats. All formats are in reverse order when 
stored in 80286 memory. That is, the first byte (lowest memory address) is the least 
significant byte of the Significand; the last byte (highest memory address) contains 
the sign and the top seven bits of the Exponent. 


The three formats supported are the 32-bit Short Real, the 64-bit Long Real, and 
the 80-bit Temporary Real. 


Short Real 
I-bit Sign 
8-bit Exponent: Bias 126 if Exponent zero; 127 if nonzero 
0-bit Implicit Integer Bit: 0 if Exponent zero; | if nonzero 
23-bit Fractional Part: digits to the right of the Binary Point 


Long Real 
1-bit Sign 
11-bit Exponent: Bias 1022 if Exponent zero; 1023 if nonzero 
0-bit Implicit Integer Bit: 0 if Exponent zero: I if non-zero 
52-bit Fractional Part: digits to the right of the Binary Point 


Temporary Real 
1-bit Sign 
15-bit Exponent: Bias 16382 if Exponent zero; 16383 if nonzero 
1-bit Explicit Integer Bit 
63-bit Fractional Part: digits to the right of the Binary Point 


Special Values in All Three Formats 


Infinity: maximum exponent and zero Significand 
NaN: maximum exponent and nonzero Significand 
Zero: minimum exponent and zero Significand 
Denormal: minimum exponent and nonzero Significand 


APPENDIX D 


SUMMARY OF 80287 INSTRUCTIONS 


This appendix contains a reference chart of NPX instructions. Following is an expla- 
nation of each column of the chart. 


Opcode 


This column gives the machine codes generated by ASM86 and BND286 for the 
given instruction. Digits and uppercase letters A-F are hexadecimal digits. In addition, 
the following special codes are used: 


¢ idenotes a 4-bit quantity the top bit of which is 0 and the bottom three bits of 
which give the 80287 stack element number for the instruction. 


¢ j denotes i plus 8. It is a 4-bit quantity the top bit of which is | and the bottom 
three bits of which give the 80287 stack element number for the instruction. 


*  / followed by a digit denotes a MODRM byte, as described in the ASM286 
language manual. The digit gives the value of the middle REG field of the byte 
(bits 5,4,3). The MOD field (bits 7,6) can be any of the values 00, 01, or 10. The 
R/M field (bits 2,1,0) can be any of the 8 possible values. For some values of 
MOD and R/M, one or two immediate displacement bytes follow the MODRM 
byte, as defined by the 80286 architecture. 


The machine codes are those for the 80287 component, produced by binding 
80287.LIB to your ASM 286 object modules. If a segment override byte exists, it goes 
between the first (WAIT or NOP) byte and the second (ESCAPE) byte. 


Instruction 


This column gives the 80287 instruction just as it appears in an ASM286 program. 
Operands that begin with “mem” can be replaced with any memory operand denot- 
ing a data area of the correct number of bytes. The number following mem gives the 
decimal number of memory bytes acted upon. A trailing r in the name denotes a 
REAL format, i an INTEGER format, and d a Binary Coded Decimal format. 


Function 


This column gives a concise description of the function performed by the instruction. 


Clocks 


This column gives the typical number of clock cycles used by the 80287 chip to execute 
the instruction. It is not an exact number. If a MODRM byte is involved, a typical 
lime of nine cycles is added for calculating the effective address of the memory 
operand. 


ErrID 


This column gives the hexadecimal value returned by the procedure DECODE in the 
library EH287.LIB, described in Chapter 5. The value indicates the type of instruc- 
tion that caused an error, and is returned in the OPERATION field of the structure 
ESTATE287. 


Summary of 80287 Instructions 
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This column lists the possible exceptions that can occur if the instruction is executed. 


Instruction 


F2XM1 

FABS 

FADD 

FADD ST(i),ST 
FADD ST,ST(i) 
FADD mem4r 
FADD mem®8r 
FADDP ST(i),ST 
FBLC mem10d 
FBSTP mem10d 
FCHS 

FCLEX 

FCOM 

FCOM ST(i) 
FCOM mem4r 
FCOM memér 
FCOMP 
FCOMP ST(i) 
FCOMP mem4r 
FCOMP memér 
FCOMPP 
FDECSTP 
FDIV 

FDIV ST(i),ST 
FDIV ST,ST(i) 
FDIV mem4r 
FDIV mem8r 
FDIVP ST(i),ST 
FDIVR 

FDIVR ST(i),ST 
FDIVR ST,ST(i) 
FDIVR mem4r 
FDIVR mem®r 
FDIVRP ST(i),ST 
FFREE ST(i) 
FIADD mem2i 
FIADD mem4i 
FICOM mem2i 
FICOM mem4i 
FICOMP mem2i 
FICOMP mem4i 
FIDIV mem2i 
FIDIV mem4i 
FIDIVR mem2i 
FIDIVR mem4i 
FILD mem2i 
FILD mem4i 
FILD mem8i 
FIMUL mem2i 
FIMUL mem4i 
FINCSTP 
FINIT 

FIST mem2i 
FIST mem4i 
FISTP mem2i 
FISTP mem4i 
FISTP mem8i 
FISUB mem2i 
FISUB mem4i 
FISUBR mem2i 
FISUBR mem4i 
FLD ST(i) 

FLD mem10r 
FLD mem4i 
FLD mem8r 


Function 


ST «¢(2°*ST)-1 
STe¢!tST! 

ST(1) + ST(1)+ST,pop 
ST(i)¢ ST(I)+ST 

ST ¢(i)+ST 
ST¢ST+mem4r 

ST © ST+mem&r 

ST(i) + ST(i) + ST,pop 
push, ST + mem10d 
mem10d ¢ ST,pop 
ST¢+—-ST 

clear exceptions 
compare ST—ST(1) 
compare ST—ST(i) 
compare St—mem4R 
compare ST —memé&r 
compare ST—ST(1),pop 
compare ST—ST(i),pop 
compare ST—mem4r,pop 
compare St—mem&r,pop 
compare ST—ST(1),pop2 
decrement stack pointer 
ST(1) © ST(1)/ST,pop 
ST(i) ¢ ST(iI)/ST 
ST«ST/ST(i) 

ST ¢ST/mem4r 

ST ¢ ST/mem8r 

ST(i) ¢ ST(i)/ST.pop 
ST(1)¢ ST/ST(1),pop 
ST(i) © ST/ST(i) 

ST ¢ ST(i)/ST 

ST © mem4r/ST 

ST «mem8r/ST 

ST(i) ¢ ST/ST(i), pop 
empty ST(i) 
ST¢ST+mem2i 

ST + ST-+mem4i 
compare ST—mem2i 
compare ST —mem4i 
compare ST —memz2i,pop 
compare ST—mem4i,pop 
ST © ST/mem2i 

ST ¢ ST/mem4i 

ST © mem2i/ST 

ST « mem4i/ST 

push,ST ¢ mem2i 
push,ST ¢ mem4i 
push,ST ¢ mem®8i 

ST « ST*mem2i 

ST © ST*mem4i 
increment stack pointer 
initialize 80287 

mem2i« ST 

mem4i« ST 

mem2i « ST,pop 
mem4i¢ ST,pop 

mem8i + ST,pop 

ST «+ ST—mem2i 

ST «+ ST-—mem4i 

ST © mem2i—ST 

ST «© mem4i—ST 
push,ST ¢ old ST(i) 
push,ST « mem10r 
push,ST ¢« mem4r 
push,ST « mem8r 


Clocks ErrlD Errors 


IDZOUP 
IDZOUP 
IDZOUP 
IDZOUP 
IDZOUP 
IDZOUP 
IDZOUP 
IDZOUP 
IDZOUP 
IDZOUP 
IDZOUP 
IDZOUP 


ID 

IDZOUP 
IDZOUP 
IDZOUP 
IDZOUP 
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Opcode 


Instruction 


FLD1 

FLDCW mem2i 
FLDENV mem14 
FLDL2E 
FLDL2T 
FLDLG2 
FLDLN2 

FLDPI 

FLDZ 

FMUL 

FMUL ST(i),ST 
FMUL ST,ST(i) 
FMUL mem4r 
FMUL mem8r 
FMULP ST(i),ST 
FNCLEX 

FNINIT 

FNOP 

FNSAVE mem94 
FNSTCW mema2i 
FNSTENV mem14 
FNSTSW mem2i 
FPATAN 
FPREM 

FPTAN 
FRNDINT 
FRSTOR mem94 
FSAVE mem94 
FSCALE 

FSQRT 

FST ST(i) 

FST mem4r 

FST mem8r 
FSTCW mem2i 
FSTENV mem14 
FSTP ST(i) 
FSTP mem10r 
FSTP mem4r 
FSTP mem8r 
FSTSW mem2i 
FSUB 

FSUB ST(i),ST 
FSUB ST,ST(i) 
FSUB mem4r 
FSUB mem8r 
FSUBP ST(i),ST 
FSUBR 

FUSBR ST(i),ST 
FSUBR ST,ST(i) 
FSUBR mem4r 
FSUBR memér 
FSUBRP ST(i),ST 
FTST 

FWAIT 

FXAM 

FXCH 

FXCH ST(i) 
FXTRACT 
FYL2X 

FYL2XP1 


Function 


push,ST «1.0 

control word « mem2i 
environment ¢ mem14 
push,ST ¢ log base 2 ofe 
push,ST «log base 2 of 10 
push,ST «log bse 10 of 2 
push,ST « log base e of 2 
push,ST ¢ Pi 

push,ST « +0.0 

ST(1) + ST(1)*ST,pop 

ST(I) © ST(i)"ST 
ST¢ST'ST(i) 

ST + ST*mem4r 

ST « ST*mem8r 

ST(i) ¢ ST(i)"ST,pop 

nowait clear exceptions 
nowait initialize 80287 

no operation 

nowait mem94 ¢ 80287 state 
nowait mem2i ¢ control word 
nowait mem14 ¢ environment 
nowait mem2i ¢ status word 
ST © arctan(ST(1)/ST),pop 
ST «+ REPEAT(ST—ST(1)) 
push,ST(1)/ST ¢ tan(old ST) 
ST + round(ST) 

80287 state « mem94 
mem94 ¢ 80287 state 

ST ¢ST‘2**ST(1) 

ST ¢ square root of ST 
ST(i) © ST 

mem4r¢ ST 

memér ¢ ST 

mem2i + contro! word 
mem14 ¢ environment 
ST(i)+ ST,pop 

mem10r¢ ST,pop 

mem4r ¢ ST,pop 

mem8r ¢ ST,pop 

mem2i¢ status word 
ST(1)¢ ST(1)—ST,pop 

ST(i) ¢ ST(i)-—ST 

ST + ST-ST(i) 

ST «+ ST—mem4r 

ST «+ ST—memé&r 

ST(i) « ST(i)—ST,pop 
ST(1)+ ST—ST(1),pop 
ST(i)+ ST-—ST(i) 

ST ¢ ST(i)—ST 

ST «© mem4r—ST 

ST ¢mem8r—ST 

ST(i) + ST—ST(i),pop 
compare ST—0.0 

wait for 80287 ready 
C3—C0 + type of ST 
exchange ST and ST(1) 
exchange ST and ST(i) 
push, ST(1)+ expo, ST + sig 
ST ¢ ST(11)*log2(ST),pop 
ST € ST(1)"log2(ST + 1),pop 


Clocks 


Summary of 80287 Instructions 


ErrlD Errors 
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APPENDIX E 


SUMMARY OF SUPPORT 


LIBRARY FUNCTIONS 


This appendix gives condensed summaries of the procedures and functions of the 
DC287.LIB, CEL287.LIB, and EH287.LIB libraries. Use this appendix as a quick 
reference after assimilating the material in Chapters 2, 3, 4, and 5 of the manual. 


DC287.LIB 


All input parameters to DC287.LIB are 4-byte long pointers to 80286 memory buffers 
that contain the inputs and outputs. The pointer(s) are pushed onto the 80286 stack, 
high byte first, before calling the procedure. The procedure returns with the pointer(s) 
popped off the 80286 stack. 


The first three procedures have one input pointer. The last four procedures have two 
input pointers. 


mqcBIN_DECLOW (Convert binary number to decimal string) 


Input: BIN_.DECLOW_BLOCK_PTR > 
4-byte BIN_PTR 3 input binary number 
l-byte BIN_TYPE: 0 for SHORT_REAL 
1 for LONG_REAL 
2 for TEMP_REAL 
1-byte DEC_LENGTH: length of output field 
4-byte DEC_PTR + output decimal significand, decimal point at right 
2-byte DEC_EXPONENT: base ten exponent of output 
1-byte DEC_SIGN: sign of output, in ASCII 


Sign and digits output for unusual inputs: 
NaN = “..” 
+INFINITY = “++” 
—INFINITY = “-—” 


+0="0” 
—0 = “—0" 
Errors: 1,D,P 


mpqDEC_BIN (Convert decimal string to binary number) 


Input! DEC_BIN_BLOCK_PTR 4 
4-byte BIN_PTR > output binary number 
|-byte BIN_TYPE: 0 for SHORT_REAL 
| for LONG_REAL 
2 for TEMP_REAL 
I-byte DEC_LLENGTH: length of input field 
4-byte DEC_PTR > input string. 


Errors: O,U,P 


mqcDECLOW_BIN (Convert decimal string, low-level interface, to binary 
number) 
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Input! DECCLOW_BIN_BLOCK_PTR > 
4-byte BIN_PTR ~ output binary number 
I-byte BIN_TYPE: 0 for SHORT_LREAL 
| for LONG_REAL 
2 for TEMP_REAL 
l-byte DEC_LENGTH: length of input field 
4-byte DEC_PTR 3 input string, stripped down to decimal digits 
2-byte DEC_LEXPONENT: base ten exponent, with decimal point to 
right of input 
l-byte DEC_SIGN: sign of input, in ASCII 


Errors: O,U,P 


mqcLONG_TEMP (Convert LONG_REAL to TEMP_REAL) 


Inputs; LONG_REAL_PTR > input number 
TEMP_REAL_PTR + output number 


Error: D 


mqcSHORT_TEMP (Convert SHORT_REAL to TEMP_REAL) 


Inputs: SHORT_REAL_PTR 94 input number 
TEMP_REAL_PTR + output number 


Error: D 


mqcTEMP_LONG (Convert TEMP_REAL to LONG_REAL) 


Inputs: TEMP_REAL_PTR > input number 
LONG_REAL_PTR > output number 


Errors: I,0,U,P 


mqcTEMP_SHORT (Convert TEMP_REAL to SHORT_REAL) 


Inputs: TEMP_REAL_PTR + input number 
SHORT_REAL_PTR + output number 


Errors: 1,0,U,P 


80287 Support Library 
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x denotes the 80287 stack top ST. 

y denotes the 80287 next stack element ST(1). 

STK denotes a 2-byte integer pushed onto the 80286 stack. 

All 80286 and 80287 stack inputs are popped on successful return. 

The errors columns give the hexadecimal code left in the 11-bit 80287 opcode regis- 
ter, along with the possible errors the function can produce. Unmasked errors trap 
with the input(s) on the 80287 stack if under the Inputs column; with the output(s) 


on the 80287 stack if under the Outputs column. The first of the three hex digits tells 
how many numbers are on the 80287 stack when a trap handler is called. 


Errors, trap with: 


Name Function Inputs Outputs 
mqaqerACS x = arc cosine(x) 175 | 
mqerASN x = arc sine(x) 174 1 
mqgerAT2 x = arc tangent(y,x) 277 «I 277 ~2U 
mqerATN x = arc tangent(x) 176 «#1 
mqerCOS x = cosine(x) 172 «1 
mqerCSH = hyperbolic cosine(x) 16F 10 
mqerDIM x = max(y—x, +0) 265 | 265 OU * 
maqerEXP x=e"*x 16B l1OU 
mgerlA2 AX = roundaway(x) 17E | 
maerlA4 DXAX = roundaway(x) 168 «| 
maerlAX x = roundaway(x) 167 | 
maerlC2 AX = chop(x) 17E | 17E P 
mgerlC4 DXAX = chop(x) 179 «| 179 P 
mqaerICX = chop(x) 166 | 166 P 
mqaerlE2 AX = roundeven(x) 180 | 180 P 
maerlE4 DXAX = roundeven(x) 17B | 17B P 
mqerlEX xX = roundeven(x) 178 | 178 P 
mqerLGD x = common log(x) 16D IZ 
mqaerLGE X = natural log(x) 16C IZ 
mqerMAX x = max(x,y) 282 =| = 
mqgerMIN x = min(x,y) 281 | . 
mqerMOD x = (y mod x), has sign(y) 269 | 269 U 
maqerRMD x = (y mod x), close to 0 27A | 27A U 
mqerSGN x = (y with x’s sign) 264 1 * 
mqgerSIN x = sine(x) 171 «1 
mqerSNH x = hyperbolic sine(x) 16E 10 
mqerTAN x = tangent(x) 173 IZ 
mqgerTNH x = hyperbolic tangent(x) 170 | 
maerY2X x= yx 26A IZOU 
mgaerYl2 x = x**AX 27C =10OU 
maerY14 x = x"*DXAX 27C 10U 
mqaerYIS x = x"STK 27C 10U 


*mqerDIM, mqerMAX, mgerMIN, and mgerSGN can produce D errors from within their 
interiors, 
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EH287.LIB 


All EH287.LIB procedures operate on a ESTATE287 structure, summarized below. 


Elements of ESTATE287: 


OPERATION WORD instruction or procedure that caused error 
ARGUMENT BYTE two nibbles, each coded: 

O=no operand 

1=ST(0) 

2=ST(1) 


3=ST(REGISTER) 
4=see FORMAT 


5=TEMP REAL 
6=64-bit integer 
7=BCD 
bit 3 means push once 
ARG1(5)WORD value of bottom-nibble argument 
ARG1_FULL BYTE true if ARG1 contains a value 
ARG2(5) WORD value of top-nibble argument 
ARG2_FULL BYTE true if ARG2 contains a value 
RESULT BYTE formats of result, as in ARGUMENT; except bit 3 on means 
pop once, bit 7 on means pop twice 
RES1(5)WORD value of bottom-nibble result 
RES1_FULL BYTE true if RES1 contains a value 
RES2(5) WORD value of top-nibble result 
RES2_FULL BYTE true if RES2 contains a value 
FORMAT BYTE format of type 4 ARGUMENT or RESULT: 
0=32-bit real 
1=32-bit integer 
2=64-bit real 
3= 16-bit integer 
REGISTER BYTE 80287 stack register number for type 3 ARGUMENT or RESULT 
CONTROL_WORD WORD 80287 contro! word 
STATUS_WORD WORD 80287 status word 
TAG_WORD WORD 80287 tag word 
ERROR_POINTERS(5) WORD 80287 instruction pointer, opcode, operand pointer 
STACK_287(40)WORD 80287 stack of 8 temporary real values 


DECODE: Push 4-byte ESTATE287_PTR and 2-byte ERRORS287 before calling. 
DECODE fills ESTATE287 with information about the 80287 error that caused the 
exception. 


ENCODE: Push 4-byte ESTATE287_PTR, 2-byte ERRORS287, 2-byte 
CONTROL_WORD, I|-byte RETRY_FLAG before calling. ENCODE restores the 
80287 to the state indicated by ESTATE287; if RETRY_FLAG is true if retries the 
error operation using CONTROL_WORD. 


FILTER: Push 2-byte ERRORS287 before calling. FILTER calls DECODE, 
NORMAL, SIEVE, and ENCODE. FILTER returns AL TRUE if either NORMAL 
or SIEVE returned TRUE. 


NORMAL: Push 4-byte ESTATE287_PTR and 2-byte ERRORS287 before calling. 
NORMAL returns AL TRUE if D was the only error in ERRORS287; it also 
normalizes arguments if operation was not a load operation. 


SIEVE: Push 4-byte ESTATE287_PTR and 2-byte ERRORS287 before calling. 
SIEVE returns AL TRUE if a nontrapping NaN occurred that should not have caused 
an I error. 
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APPENDIX F 


PUBLIC SYMBOLS IN THE 
SUPPORT LIBRARY 


Each of the three libraries DC287.LIB, CEL287.LIB, and EH287.LIB use public 
symbols other than the names of the procedures documented in this manual. They 
are internal names, used either in the libraries or by Intel translators. 


You should not use any of these names in your programs. 


The 80287 emulator or interface libraries have no extra public names other than 
those listed in Appendix B. The names in Appendix B cannot be generated by Intel 
translators, eliminating possible conflict. 


Following is a list of all public names, both documented and undocumented, for each 


library. 
DC287. LIB 


CHK_UNMSKD_O_U_ERR 


MQCBINDEC 
MQCBIN_DECLOW 
MQCDBX 
MQCDBXDB 
MQCDECBIN 
MQCDECBINLO 
MQCDECLOW_BIN 
MQCDEC_BIN 
MQCLONG_TEMP 
MOCSHORT_TEMP 


CEL287.LIB 


MQERACS 
MQERAIN 
MQERANT 
MQERASN 
MQERAT2 
MQERATN 
MQERCI2 
MQERCOS 
MQERCSH 
MQERDIM 
MQEREXP 
MQERIA2 
MQERIA4 
MQERIAX 
MQERIC2 
MQERIC4 
MQERICX 
MQERIE2 
MQERIE4 
MQERIEX 
MQERINT 
MQERIRT 
MQERLGD 
MQERLGE 
MQERMAX 


MQERMIN 
MQERMOD 
MQERNI2 
MQERNIN 
MQERRI2 
MQERRMD 
MQERRNT 
MQERSGN 
MQERSIN 
MQERSNH 
MQERTAN 
MQERTNH 
MQERY2X 
MQERYI2 
MQERYI4 
MQERYIS 
MQ_! 
MQ_2XMI 
MQ_63U 
MQ_63U1 
MQ_63UPI2 
MQ_AT2 
MQ_CONST 
MQ_COS 
MQ_CP2N63 


MQCSNGXDB 
MQCSNX 
MQCTEMP_LONG 
MQCTEMP_SHORT 
MQCXDB 
MQCXDBDB 
MQCXDBSNG 
MQCXSN 
POWER_OF_10 
UNMSKD_OV_OR_UN 
XCPTN_RTRN 


MQ_DECIDE 
MQ_EXIT 
MQ_EXMI 
MQ_I 
MQ_IRCHK 
MQ_LOG 
MQ_LOGIO 
MQ_LOGDN 
MQ_MQRPI 
MQ_NAN 
MQ_NOF 
MQ_NORM 
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EH287.LIB 
DECODE MQERSGN 
ENCODE MQERSIN 
FILTER MQERSNH 
FQFORTRANSTATUSCHECK MQERTAN 
MQERACS MQERTNH 
MQERAIN MQERY2X 
MQERANT MQERY14 
MQERASN NORMAL 
MQERAT2 SIEVE 
MQERATN TQDECODE87 
MQERCI2 TQENCODE87 
MQERCOS TQFETCH_AND_STORE 
MQERCSH TQINSTRUCTION_RETRY 
MQERDIM TQNANFILTER 
MQEREXP TQNORM87 
MQERINT TQNORMALIZE 
MQERIRT TQPOP_THE_TOP 
MQERLGD TQREALMATHFILTER 
MQERLGE TQRESTORE_PTRS 
MQERMAX TQSAVE_PTRS 
MQERMIN TQUNPOP_THE_TOP 
MQERMOD TQ_312 
MQERNI2 TQ_320 
MOERNIN TQ_322 
MQERRI2 TQ_324 
MQERRMD TQ_326 
MQERRNT 
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GLOSSARY OF 80287 AND 


FLOATING-POINT TERMINOLOGY 


This glossary continues the convention of Chapter 6, capitalizing terms that have 
precise technical meanings. Such terms appear as entries in this glossary. Thus, you 
may interpret any nonstandard capitalization as a cross-reference, 


Affine Mode: a state of the 80287, selected in the 80287 Control Word, in which 
infinities are treated as having a sign. Thus, the values +INFINITY and —INFIN- 
ITY are considered different; they can be compared with finite numbers and with 
each other. 


Base: (1) a term used in logarithms and exponentials. In both contexts, it is a number 
that is being raised to a power. The two equations (y = log base b of x) and (by = 
x) are the same. 


Base: (2) a number that defines the representation being used for a string of digits. 
Base 2 is the binary representation; Base 10 is the decimal representation; Base 16 is 
the hexadecimal representation. In each case, the Base is the factor of increased 
significance for each succeeding digit (working up from the bottom). 


Bias: the difference between the unsigned Integer that appears in the Exponent field 
of a Floating-Point Number and the true Exponent that it represents. To obtain the 
true Exponent, you must subtract the Bias from the given Exponent. For example, 
the Short Real format has a Bias of 127 whenever the given Exponent is nonzero. If 
the 8-bit Exponent field contains 10000011, which is 131, the true Exponent is 
131-127, or +4. 


Biased Exponent: the Exponent as it appears in a Floating-Point Number, inter- 
preted as an unsigned, positive number. In the above example, 131 is the Biased 
Exponent. 


Binary Coded Decimal: a method of storing numbers; it retains a base 10 represen- 
tation. Each decimal digit occupies four full bits (one hexadecimal digit). The hex 
values A through F (1010 through 1111) are not used. The 80287 supports a “Packed 
Decimal” format that consists of nine bytes of Binary Coded Decimal (eighteen 
decimal digits), and one sign byte. 


Binary Point: an entity just like a decimal point except that it exists in binary 
numbers. Each binary digit to the right of the Binary Point is multiplied by an 
increasing negative power of two. 


C3—C0: the four “‘condition code” bits of the 80287 Status Word. These bits are set 
to certain values by the compare, test, examine, and remainder functions of the 80287. 


Characteristic: a term used for some non-Intel computers. It denotes the Exponent 
field of a Floating-Point Number. 


Chop: to set the fractional part of a real number to zero, yielding the nearest integer 
in the direction of zero. 


Control Word: a 16-bit 80287 register the user can set to determine the modes of 
computation the 80287 will use and the error interrupts that will be enabled. 
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Denormal: a special form of Floating-Point Number. It is produced when an Under- 
flow occurs. On the 80287, a Denormal is defined as a number with a Biased Exponent 
that is zero. By providing a Significand with leading zeroes, the range of possible 
negative Exponents can be extended by the number of bits in the Significand. Each 
leading zero is a bit of lost accuracy, so the extended Exponent range is obtained by 
reducing significance. 


Double Extended: the Standard’s term for the 80287 Temporary Real format, with 
more Exponent and Significand bits than the Double (Long Real) format and an 
explicit Integer bit in the Significand. 


Double Floating-Point Number: the Standard’s term for the 80287’s 64-bit Long Real 
format. 


Environment: the 14 bytes of 80287 registers affected by the FSTENV and FLDENV 
instructions. It encompasses the entire state of the 80287, except for the 8 Temporary 
Real numbers of the 80287 stack. Included are the Control Word, Status Word, Tag 
Word, and the instruction, opcode, and operand information provided by interrupts. 


Exception: any of the six error conditions (1, D, O, U, Z, P) signalled by the 80287. 


Exponent: (1) any power that is raised by an exponential function. For example, the 
operand to the function mqerEXP is an Exponent. The Integer operand to mgerY12 
is an Exponent. (2) the field of a Floating-Point Number. It indicates the magnitude 
of the number. This would fall under the above more general definition (1) except 
that a Bias sometimes needs to be subtracted to obtain the correct power. 


Floating-Point Number: a sequence of data bytes that, when interpreted in a stand- 
ardized way, represents a Real number. Floating-Point Numbers are more versatile 
than Integer representations because they include fractions, and their Exponent parts 
allow a much wider range of magnitude than possible with fixed-length Integer 
representations. 


Gradual Underflow: a method of handling the Underflow error condition. It minimizes 
the loss of accuracy in the result. If a Denormal number represents the correct result, 
that Denormal is returned. Thus, digits are lost only to the extent of denormalization. 
Most computers return zero when Underflow occurs, losing all significant digits. 


Implicit Integer Bit: a part of the Significand in the Short Real and Long Real 
formats. It is not explicitly given. In these formats, the entire given Significand is 
considered to be to the right of the Binary Point. A single Implicit Integer Bit to the 
left of the Binary Point is always 1, except in one case: when the Exponent is the 
minimum (Biased Exponent is 0), the Implicit Integer Bit is 0. 


Indefinite: a special value returned by functions when no other sensible answer is 
possible. Each Floating-Point format has one Nontrapping NaN that is designated 
as the Indefinite value. For binary Integer formats, the negative number farthest 
from zero is often considered the Indefinite value. For the 80287 Packed Decimal 
format, the Indefinite value contains all 1’s in the sign byte and the uppermost digits 
byte. 


Infinity: a value that has greater magnitude than any Integer or Real number. The 
existence of Infinity is subject to heated philosophical debate. However, it is often 
useful to consider Infinity as another number, subject to special rules of arithmetic. 
All three Intel Floating-Point formats provide representations for +INFINITY and 
—INFINITY. They support two ways of dealing with Infinity: Projective (unsigned) 
and Affine (signed). 
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Instruction Offset: See Instruction Pointer. 


Instruction Pointer: in real mode this is the 20-bit physical address and 11-bit opcode. 
In protected mode this is the 32-bit virtual address used by the program that executed 
an ESC instruction. 


Integer: a finite number (positive, negative, or zero) that has no fractional part. 
“Integer” can also mean the computer representation for such a number: a sequence 
of data bytes interpreted in a standard way. It is perfectly reasonable for Integers to 
be represented in a Floating-Point format; this is what the 80287 does whenever an 
Integer is pushed onto the 80287 stack. 


Invalid Operation: the error condition for the 80287. It covers all cases not covered 
by other errors. Included are 80287 stack overflow and underflow, NaN inputs, illegal 
infinite inputs, out-of-range inputs, and illegal unnormal inputs. 


Long Integer: an Integer format supported by the 80287. It consists of a 64-bit Two’s 
Complement quantity. 


Long Real: a Floating-Point format supported by the 80287. It consists of a sign, an 
11-bit Biased Exponent, an Implicit Integer Bit, and a 52-bit Significand—a total of 
64 explicit bits. 


Mantissa: a term used for some non-Intel computers. It denotes the Significand of a 
Floating-Point Number. 


Masked: a term that applies to each of the six 80287 Exceptions (1,D,Z,O,U,P). An 
exception is Masked if a corresponding bit in the 80287 Control Word is set to }. If 
an exception is Masked, the 80287 will not generate an interrupt when the error 
condition occurs; instead, it will provide its own error recovery. 


NaN: an abbreviation for “Not a Number”; a Floating-Point quantity that repre- 
sents no numeric or infinite quantity. NaNs should be returned by functions that 
encounter serious errors. If created during a sequence of calculations, they are trans- 
mitted to the final answer; they can contain information about where the error 
occurred. 


NDP: Numeric Data Processor. This is any iAPX 286 system that contains an 80287 
or the full 80287 emulator. 


Nontrapping NaN: a NaN in which the most significant bit of the fractional part of 
the Significand is 1. By convention, these NaNs can undergo certain operations 
without visible error. Nontrapping NaNs are implemented for the 80287 via the 
software in EH287.LIB. 


Normal: the representation of a number in a Floating-Point format in which the 
Significand has an Integer bit | (either explicit or Implicit). 


Normalizing Mode: a state in which nonnormal inputs are automatically converted 
to normal inputs whenever they are uscd in arithmetic. Normalizing Mode is imple- 
mented for the 80287 via the software in EH287.LIB. 

NPX: Numeric Processor Extension. This is the 80287. 


Overflow: an error condition in which the correct answer is finite, but has magnitude 
too great to be represented in the destination format. 
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Packed Decimal: an Integer format supported by the 80287. A Packed Decimal 
number is a 10-byte quantity, with nine bytes of 18 Binary Coded Decimal! digits and 
one byte for the sign. 


Pop: to remove from a stack the last item placed on the stack. 


Precision Control: an option programmed through the 80287 Control Word. It allows 
all 80287 arithmetic to be performed with reduced precision. Since no speed advan- 
tage results from this option, its only use is for strict compatibility with the Standard 
and with other computer systems. 


Precision Exception: an 80287 error condition that results when a calculation does 
not return an exact answer. This exception is usually Masked and ignored; it is used 
only in extremely critical applications when the user must know if the results are 
exact. 


Projective Mode: a state of the 80287, selected in the 80287 Control Word, in which 
infinities are treated as not having a sign. Thus, the values +INFINITY and 
—INFINITY are considered the same. Certain operations such as comparison to 
finite numbers are illegal in Projective Mode, but legal in Affine Mode. Thus, Projec- 
tive Mode gives you a greater degree of error control over infinite inputs. 


Pseudo-Zero: a special value of the Temporary Real format. It is a number with a 
zero significand and an Exponent that is neither all zeroes or all ones. Pseudo-Zeroes 
can result from multiplying two Unnormal numbers; they are very rare. 


Real: any finite value (negative, positive, or zero) that can be represented by a decimal 
expansion. The fractional part of the decimal expansion can contain an infinite number 
of digits. Reals can be represented as the points of a line marked off like a ruler. The 
term “Real” can also refer to a Floating-Point Number that represents a Real value. 


Short Integer: an Integer format supported by the 80287. It consists of a 32-bit Two’s 
Complement quantity. Short Integer is not the shortest 80287 Integer format—the 
16-bit Word Integer is. 


Short Real: a Floating-Point Format supported by the 80287. It consists of a sign, 
an 8-bit Biased Exponent, an Implicit Integer Bit, and a 23-bit Significand; a total 
of 32 explicit bits. 


Significand: the part of a Floating-Point Number that consists of the most signifi- 
cant nonzero bits of the number, if the number were written out in an unlimited 
binary format. The Significand alone is considered to have a Binary Point after the 
first (possibly Implicit) bit; the Binary Point is then moved according to the value of 
the Exponent. 


Single Extended: a Floating-Point format required by the Standard. It provides 
greater precision than Single; it also provides an explicit Integer Significand bit. The 
80287’s Temporary Real format meets the Single Extended requirement as well as 
the Double Extended requirement. 


Single Floating-Point Number: the Standard’s term for the 80287’s 32-bit Short Real 
format. 


Standard: “a Proposed Standard for Binary Floating-Point Arithmetic,” Draft 10.0 
of IEEE Task P754, December 2, 1982 


Status Word: A 16-bit 80287 register that can be manually set, but that is usually 


controlled by side effects to 80287 instructions. It contains condition codes, the 80287 
stack pointer, busy and interrupt bits, and error flags. 


Glossary-4 


80287 Support Library Glossary of 80287 and Floating-Point Terminology 


Tag Word: a 16-bit 80287 register that is automatically maintained by the 80287. 
For each space in the 80287 stack, it tells if the space is occupied by a number; if so, 
il gives information about what kind of number. 


Temporary Real: the main Floating-Point format used by the 80287. It consists of a 
sign, a 15-bit Biased Exponent, and a Significand with an explicit Integer bit and 63 
fractional-part bits. 


Transcendental: one of a class of functions for which polynomial formulas are always 
approximate, never exact for more than isolated values. The 80287 supports trigono- 
metric, exponential, and logarithmic functions; all are Transcendental. 


Trapping NaN: a NaN that causes an | error whenever it enters into a calculation 
or comparison, even a nonordered comparison. 


Two’s Complement: a method of representing Integers. If the uppermost bit is 0, the 
number is considered positive, with the value given by the rest of the bits. If the 
uppermost bit is 1, the number is negative, with the value obtained by subtracting 
(2e* count) from all the given bits. For example, the 8-bit number 11111100 is —4, 
obtained by subtracting 2* from 252. 


Unbiased Exponent: the true value that tells how far and in which direction to move 
the Binary Point of the Significand of a Floating-Point Number. For example, if a 
Short Real Exponent is 131, subtract the Bias 127 to obtain the Unbiased Exponent 
+4, Thus, the Real number being represented is the Significand with the Binary 
Point shifted four bits to the right. 


Underflow: an error condition in which the correct answer is nonzero, but has a 
magnitude too small to be represented as a Normal number in the destination 
Floating-Point format. The Standard specifies that an attempt be made to represent 
the number as a Denormal. 


Unmasked: a term that applies to each of the six 80287 Exceptions (1,D,Z,0O,U,P). 
An exception is Unmasked if a corresponding bit in the 80287 Control Word is set 
to 0. If an exception is Unmasked, the 80287 generates an interrupt when the error 
condition occurs. You can provide an interrupt routine that customizes your error 
recovery. 


Unnormal: a Temporary Real representation in which the explicit Integer bit of the 
Significand is zero and the exponent is nonzero. Unnormal numbers as are considered 
distinct from Denormal numbers. 


Word Integer: an Integer format supported by both the 80286 and the 80287. It 
consists of a 16-bit Two’s Complement quantity. 


Zerodivide: an error condition in which the inputs are finite, but the correct answer, 
even with an unlimited exponent, has infinite magnitude. 


Glossary-5 


80287.LIB, 2-1, 2- 
287NULL.LIB, 2- 


2 
I, 2-2 


Accuracy of decimal conversions, 3-4 
ACS, 4-8 

Affine mode, Glossary-1 

Arc cosine, 4-8 

Arc sine, 4-10 

Arc tangent, 4-12, 4-15 

ASN, 4-10 

AT2, 4-12 

ATN, 4-15 


Base, Glossary-1 

Bias, Glossary-1 

Biased exponent, Glossary-I 
BIN_DECLOW, 3-7 

Binary Coded Decimal, Glossary-1 
Binary point, Glossary-1 

Binary to decimal conversion, 3-7 


C3-C4, Glossary-| 

Calls to PL/M-286 functions, 4-5 
CEL287.LIB, 4-1 ff, E-3 
Characteristic, Glossary-| 
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